在窗体上画一个命令按钮，然后编写如下程序： Option Base1 Privme Sub Command1_Click() Dim Arr(10)As Integer For i=1 To 10 Arr(i)=1

admin2019-07-30 53

问题在窗体上画一个命令按钮，然后编写如下程序：
Option Base1
Privme Sub Command1_Click()
Dim Arr(10)As Integer
For i=1 To 10
Arr(i)=11-i
Next i
x=InputBox("输入一个整数(3～10)")
PrintAn(2+Arr(x))
End Sub
程序运行后，单击命令按钮，在输入对话框中输入7，则输出结果为

选项 A、3
B、4
C、5
D、6

答案C

解析本题是一个简单的数组操作，首先在一个循环中为数组元素赋值，然后输出指定的数组元素值。最终输出的是Arr(2+Arr(7))=Arr(6)=5。

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

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