[单项选择题] 在窗体上画一个文本框，然后编写如下程序： Option Base 1 Private Sub Form

[单项选择题] 在窗体上画一个文本框，然后编写如下程序：

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)=