单项选择题

在窗体上画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