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

admin2020-04-18  14

问题 在窗体上画一个命令按钮(其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

解析 输入2和3后,n被重新定义,下标为2,上标为3。For循环执行2次,k=2k=3。因此选B。
转载请注明原文地址:https://kaotiyun.com/show/HvTp777K
0

最新回复(0)