在窗体上添加一个名称为Text1的文本框和一个名称为Command1的命令按钮,然后编写如下事件过程: Private Sub Command1_Click() Dim a(10,10)As Integer Dim i,j As

admin2011-06-07  31

问题 在窗体上添加一个名称为Text1的文本框和一个名称为Command1的命令按钮,然后编写如下事件过程:
   Private Sub Command1_Click()
     Dim a(10,10)As Integer
     Dim i,j As Integer
     For i=2 To 4
       For j=3 To 6

     Next i
     Text1.Text=a(2,3)+a(4,6)
  End Sub
程序运行后,单击命令按钮,在文本框中显示的值是(       )。

选项

答案30

解析  本题考查VBA中二维数组和循环的知识。本题属于比较简单的问题,使用了二重循环为二维数组进行了部分赋值,最后求两个数组元素值并求和,注意这两个元素是否已被赋值,若没有赋值则为0。本题中对于a(2,3)赋值为2*3也就是6,a(4,6)赋值为4*6也就是24,最后的结果为6+24=30。
转载请注明原文地址:https://kaotiyun.com/show/mTup777K
0

最新回复(0)