在窗体上画1个命令按钮,并编写如下事件过程: Private Sub Command1_Cliek() Dim a(3,3) For m=1 To 3 For n=1 To 3 If n=m Or

admin2019-04-29  12

问题 在窗体上画1个命令按钮,并编写如下事件过程:
Private Sub Command1_Cliek()
      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循环中的lf语句的条件n=m orn=4-m中的n=m首先可以得出8(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/ZON0FFFM
0

最新回复(0)