在窗体上画一个文本框,其名称为Text1,然后编写如下程序: Option Base 1 Pfivate Sub Form_Click() Dim Arr(10)As Integer For i=6 To 10 An-(i)=i一3 Next i Text

admin2019-01-17  31

问题 在窗体上画一个文本框,其名称为Text1,然后编写如下程序:
Option Base 1
Pfivate Sub Form_Click()
Dim Arr(10)As Integer
For i=6 To 10
An-(i)=i一3
Next i
Textl.Text=Str(Arr(6)+An-(An.(6)+Arr(10)))
End Sub
程序运行后,单击窗体,在文本框中显示的内容是(    )。

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

答案D

解析 For循环对数组Arr的第6个到第10个元素赋值。Arr(6)=3;Arr(10)=7;因此,输出结果是10。选D)。
转载请注明原文地址:https://kaotiyun.com/show/hMFp777K
0

最新回复(0)