假定有如下程序： Private Sub Form_Click() Dim a(4) As Integer, b(4) As Integer For k = 0 To 2 a(k + 1) = Val(InputBox("请

admin2019-03-14 47

问题假定有如下程序：
Private Sub Form_Click()
Dim a(4) As Integer, b(4) As Integer
For k = 0 To 2
a(k + 1) = Val(InputBox("请输入一个整数："))
b(3 - k) = a(k + 1)
Next k
Print b(k)
End Sub
运行程序，单击窗体，依次输入3、6、9，输出结果为

选项 A、3
B、6
C、9
D、1

答案A

解析 For循环对数组a和b赋值。b(3) = a(1)，b(2) = a(2)，b(1) = a(3)，循环结束时k=3。因此选A）。

转载请注明原文地址:https://kaotiyun.com/show/7sUp777K

本试题收录于：二级VB题库NCRE全国计算机二级分类