单选题在窗体上画1个命令按钮，并编写如下事件过程：
Private Sub Command1_Click()
Dim a(3, 3)
For m=1 To 3
For n=1 To 3
Ifn=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

【正确答案】 B

【答案解析】[解析] 本题通过一个嵌套的For循环为二维数组a的各元素赋值，该二维数组对应矩阵的主对角线上的元素(即满足条件m=n)和副对角线上的元素(即满足条件m+n=4)其值为m+n，即主对角线上的元素从左上至右下依次为2、4、6，副对角线上的元素均为4，而其它元素均为0。