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