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

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

[单项选择题] 在窗体上画一个文本框，然后编写如下程序： Option base 1 Private Sub Form_Click() Dim Arr(10)As IntegerFor i=6 To 10 Arr(i)=i-3Next iText1．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