问题
单项选择题
在窗体上画一个文本框，然后编写如下程序：
Option Base 1
Private Sub Form_Click()
Dim Arr(10)As Integer
For i=6 To 10
Arr(i)=i-3
Next i
Text1．Text：Str(Arr(6)+Arr(Arr(6)+Arr(10)))
End Sub
程序运行后，单击窗体，在文本框中显示的内容是
A．1
B．3
C．6
D．10
答案
参考答案：D
解析：
[分析]： 在本题中，定义了一个一维数组Arr，并为其开辟了10个元素的空间，然后通过For循环为该数组的后5个元素赋值。不难看出，数组Arr后5个元素的值分别为3、4、5、6、 7。最后一个语句是为文本框的Text属性赋值，这个值是Arr数组的两个元素之和，其中第一个元素是Arr(6)，即3；第二个元素的下标是数组Arr第六个元素(3)和第十个元素(7)的和，即 Arr(3+7)=Arr(10)，而该元素的值为7。因此， Arr(6)+Arr(Arr(6)+Arr(10))=3+Arr(10)=3+ 7=10
