单选题
在窗体上画一个名称为Text1的文本框和一个名称为Command1的命令按钮,然后编写如下事件过程:
Private Sub
Command1_Click()
Dim array1(10,10)As Integer
Dim i,j As
Integer
For i=1 To 3
For j=2 To 4
array1(i,j)=i +j
Next
j
Next i
Text1.Text=array1(2,3)+array1(3,4)
End
Sub
程序运行后,单击命令按钮,在文本框中显示的值是{{U}} {{/U}}。
【正确答案】
A
【答案解析】[解析] 本题考查数组的输出。题目比较简单,但需要注意循环因子的值,经过循环后,数组arrayl(2,3)=5,array1(3,4)=7,然后将 array1(2,3)+array1(3,4)赋给Text1,可知正确答案为选项A。这种控件属性和数组结合的题目历年都会考查。