单项选择题

以下程序段的执行结果是 ______。
Dim A(3, 3)
For m = 1 To 3
For n = 1 To 3
If n = m Or n = 3 - m + 1 Then
A(m, n) =m + n
Else
A(m, n) = 0
End If
Next n
Next m
For m = 1 To 3
For n = 1 To 3
Print A(m, n);
Next n
Print
Next m