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

admin2019-03-08  33

问题 在窗体上画一个命令按钮(其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(2 To 3),只有两个数组元素,并且n(k)=k,即输出2 3。
转载请注明原文地址:https://jikaoti.com/ti/r3m0FFFM
0

最新回复(0)