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

admin2020-06-30  19

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

答案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。
转载请注明原文地址:https://jikaoti.com/ti/56S0FFFM
0

最新回复(0)