命令按钮Commandl的单击事件过程如下： Private Sub Commandl_Click() Dim a(10，10)As Integer X=0 For i=1 T0 3

admin2019-06-11 27

问题命令按钮Commandl的单击事件过程如下：
Private Sub Commandl_Click()
   Dim a(10，10)As Integer
   X=0
   For i=1 T0 3
         Forj=1 To 3
         a(i，j)=i*2 Mod j
         Ifx       Next
   Next
   Print X
  End Sub
执行上述事件过程后，窗体上显示的是

选项 A、1
B、2
C、3
D、4

答案B

解析本题中使用二重循环为二维数组赋初值，每个元素的值为行号×2然后除以列号的余数；接下来找出数组的最大值。由于列号最大只能为3，所以余数的最大值为2。

转载请注明原文地址:https://kaotiyun.com/show/6jUp777K

本试题收录于：二级VB题库NCRE全国计算机二级分类