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

命令按钮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

admin2016-12-13  27
问题 命令按钮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
解析 本题中使用二重循环为二维数组赋初值，每个元素的值为行号×2然后除以列号的余数；接下来找出数组的最大值。由于列号最大只能为3，所以余数的最人值为2。
转载请注明原文地址:https://kaotiyun.com/show/yIGp777K
本试题收录于： 二级VB题库NCRE全国计算机二级分类
0

二级VB

NCRE全国计算机二级

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