在窗体上画1个命令按钮,并编写如下事件过程: Private Sub Command1_Click() Dim a(3,3) For m=1 To 3For 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 nPtint Next m End Sub 运行程序,单击命令按钮,窗体上显示的内
单选题
在窗体上画1个命令按钮,并编写如下事件过程: Private Sub Command1_Click() Dim a(3,3) For m=1 To 3For 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 nPtint Next m End Sub 运行程序,单击命令按钮,窗体上显示的内