2. 计算机
  3. 命令按钮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)

命令按钮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  50
问题 命令按钮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
本试题收录于： 二级VB题库NCRE全国计算机二级分类
0

二级VB

NCRE全国计算机二级

相关试题推荐
随机试题
最新回复(0)