单项选择题

在窗体上画1个命令按钮,并编写如下事件过程:
Private Sub Command1_Click()
Dim a(3, 3)
For m = 1 To 3
For n = 1 To 3
If n = m Or n = 4 - m Then
a(m, n) = m + n
Else
a(m, n) = 0
End If
Print a(m, n);
Next n
Print
Next m
End Sub
运行程序,单击命令按铡,窗体上显示的内容为( )。

A) 2 0 0
0 4 0
0 0 6
B) 2 0 4
0 4 0
4 0 6
C) 2 3 0
3 4 0
0 0 6
D) 2 0 0
0 4 5
0 5 6