[单项选择题] 命令按钮Command1的单击事件过程如下： Private Sub Command1_Click( ) Dim a( 10, 10)As

[单项选择题] 命令按钮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。