问题
单项选择题
命令按钮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＜a(i, j)Then x=a(i, j)
Next
Next
Print x
End Sub
执行上述事件过程后，窗体上显示的是( )。
A) 1
B) 2
C) 3
D) 4
答案
参考答案：B
解析： 题目中定义了一个二维数组，为数组赋初值并找出这些值中最大的值输出。数组中的值为：
a(1, 1)=1*2 rood 1=0a(1, 2)=1*2 mod 2=0a(1, 3)=1*2 mod 3=2
a(2, 1)=2*2 rood 1=0a(2, 2)=2*2 mod 2=0a(2, 3)=2*2 rood 3=1
a(3, 1)=3*2 mod 1=0a(3, 2)=3*2 rood 2=0a(3, 3)=3*2 rood 3=0
显然最大值为2，因此Print x语句将在窗体上显示2。