命令按钮Commandl的单击事件过程如下: Private Sub Commandl_Click() Dim a(10,10)As Integer x=0 For i=1 To 3 For j=1 To 3 a(i,j)

admin2017-06-21  17

问题 命令按钮Commandl的单击事件过程如下:
Private Sub Commandl_Click()
  Dim a(10,10)As Integer
  x=0
   For i=1 To 3
     For j=1 To 3
     a(i,j)=i*2 Mod J
     Ifx<a(i,j)Then x=a(i,j)
    Next
   Next
  Print x
End Sub
执行上述事件过程后,窗体上显示的是

选项 A、1
B、2
C、3
D、4

答案B

解析 本题中使用二重循环为二维数组赋初值,每个元素的值为行号×2然后除以列号的余数;接下来找出数组的最大值。由于列号最大只能为3,所以余数的最大值为2。
转载请注明原文地址:https://jikaoti.com/ti/riy0FFFM
0

最新回复(0)