在窗体上画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 mEnd Sub运行程序,单击命令按钮,窗体上显示的内容为( )。
A.2 0 00 4 00 0 6
B.2 0 40 4 0 4 0 6
C.2 3 03 4 00 0 6
D.2 0 00 4 50 5 6
热度🔥382
参考答案:B
解析:
【解析】根据For循环中的If语句的条件n=m or n=4-m中的n=m首先可以得出a(1,1)=2,a(2,2)=4,a(3,3)=6,其次根据n=4-m的条件可以得出a(1,3)=4,a(2,2)=4,a(3,1)=4。而其他的元素值都为0。因此窗体上输出的三行分别是:2 0 4 ,0 4 0,4 0 6。