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

admin2020-04-18 51

问题在窗体上画一个文本框，其名称为Text1，然后编写如下程序：
  Option Base 1
  Private Sub Form_Click()
Dim Art(10)As Integer
For i=6 To 10
Arr(i)=i－3
Next i
Text1．Text=Str(Arr(6)+Art(Arr(6)+Art(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/WpTp777K

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