在窗体上画一个命令按钮,然后编写如下程序: Option Base 1 Prirate Sub Command1_Click() Dim Arr(10)As Integer For i=1 To 10 Art(i)=11-i Next i x=InputB

admin2016-06-23  59

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

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

答案C

解析 For循环对数组An,赋初值。得到的结果是元素值从10到1的倒序。Art(7)=4。Art(2+Arr(x))=Arr(2+4)=5。选C。
转载请注明原文地址:https://jikaoti.com/ti/FCJ0FFFM
0

最新回复(0)