在窗体上画一个命令按钮(其Name属性为Command1),然后编写如下代码: Private Sub Command1_Click() Dim n()As Integer Dim a,b As Integer a=InputBox("Enter the

admin2020-04-18  10

问题 在窗体上画一个命令按钮(其Name属性为Command1),然后编写如下代码:
Private Sub Command1_Click()
Dim n()As Integer
Dim a,b As Integer
a=InputBox("Enter the first number")
b=InputBox("Enter the second number")
ReDim n(a To b)
For k=LBound(n) To UBound(n)
n(k)=k
Print n(k);
Next k
End Sub
程序运行后,单击命令按钮,在输入对话框中分别输入2和3,输出结果为

选项 A、1 2
B、2 3
C、3 4
D、4 5

答案B

解析 动态数组以变量作为下标值,在程序运行过程中完成定义,通常分为两步:首先在窗体层、标准模块或过程中用Dim或Public声明一个没有下标的数组(括号不能省略),然后在过程中随时用ReDim语句可以重定义变量作为下标的数组,重定义后原数组的所有元素值被清空。输入2、3之后数组被重新定义成了n(2To3),只有两个数组元素,并且n(k)=k,即输出2 3。
转载请注明原文地址:https://kaotiyun.com/show/TaTp777K
0

最新回复(0)