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

admin2018-09-19  21

问题 命令按钮Command1的单击事件过程如下:
Private Sub Command1_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
      If x    Next
  Next
  Print x
End Sub
执行上述事件过程后,窗体上显示的是(  )。

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

答案B

解析 题目中定义了一个二维数组,为数组赋初值并找出这些值中最大的输出。数组中的值为:
    a(1,1) =1*2 mod 1=0a(1,2) =1*2 mod 2=0a(1,3)=1*2mod 3=2
    a(2,1) =2*2 mod 1=0a(2,2) =2*2 mod 2=0a(2,3)=2*2mod 3=1
    a(3,1) =3*2 mod 1=0a(3,2) =3*2 mod 2=0a(3,3)=3*2mod 3=0
    显然最大值为2,因此Print x语句将在窗体上显示2.   
转载请注明原文地址:https://kaotiyun.com/show/J9Fp777K
0

最新回复(0)