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

admin2017-04-25  21

问题 在窗体上画一个命令按钮,然后编写如下程序:
    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://jikaoti.com/ti/g6y0FFFM
0

最新回复(0)