以下程序段的执行结果是 ______。
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

A．1 1 1
1 1 1
1 1 1

B．2 0 4
0 4 0
4 0 6

C．0 0 0
0 0 0
0 0 0

D．1 0 1
0 1 0
1 0 1