命令按钮Command1的单击事件过程如下: Private Sub Command1_Click() Dim a(10,10)AsI nteger x=0 For i=1To3 For j=1To3 a(i,j)=i*2Mod j If x<a(i,j)

admin2018-06-20  26

问题 命令按钮Command1的单击事件过程如下:
Private Sub Command1_Click()
Dim a(10,10)AsI nteger
x=0
For i=1To3
For j=1To3
a(i,j)=i*2Mod 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*2mod1=0a(1,2)=1*2mod2=0a(1,3)=1*2mod3=2
a(2,1)=2*2mod1=0a(2,2)=2*2mod2=0a(2,3)=2*2mod3=1
a(3,1)=3*2mod1=0a(3,2)=3*2mod2=0a(3,3)=3*2mod3=0
显然最大值为2,因此Print x语句将在窗体上显示2。
转载请注明原文地址:https://kaotiyun.com/show/E4Gp777K
0

随机试题
最新回复(0)