在窗体上添加一个名称为Text1的文本框和一个名称为Command1的命令按钮,然后编写如下事件过程: Pr

在窗体上添加一个名称为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

程序运行后，单击命令按钮，在文本框中显示的值是( )。

3030 解析： 本题考查VBA中二维数组和循环的知识。本题属于比较简单的问题，使用了二重循环为二维数组进行了部分赋值，最后求两个数组元素值并求和，注意这两个元素是否已被赋值，若没有赋值则为0。本题中对于a(2,3)赋值为2*3也就是6，a(4,6)赋值为4*6也就是24，最后的结果为6+24=30。