在窗体卜画一个文本框，其名称为Textl，然后编写如下程序： Option Base l Private Sub Form_Click()Dim Arr(1 0)As Integer For i=6 To 10

admin2020-01-02 38

问题在窗体卜画一个文本框，其名称为Textl，然后编写如下程序：
Option Base l
Private Sub Form_Click()Dim Arr(1 0)As Integer
         For i=6 To 10
               Arr(i)=i-3
         Next i
         Text 1．Text=Str(Arr(6)+Arr(Arr(6)+Arr(1 0)))
End Sub
程序运行后，单击窗体，在文本框中显示的内容是

选项 A、7
B、8
C、9
D、10

答案D

解析本题中在循环中为数组部分元素赋值，把Arr(6)～Arr(10)分别赋值为3～7，其余的数组元素保持默认值0；最终输出的是Arr(6)+Arr(Arr(6)+Arr(10))即Arr(6)+Arr(10)=10。

转载请注明原文地址:https://kaotiyun.com/show/hnTp777K

本试题收录于：二级VB题库NCRE全国计算机二级分类