假定有如下程序： 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(

admin2020-04-18 32

问题假定有如下程序：
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

解析本题在循环中输入数据，当第一次输入3的时候a(1)=3，b(3)=a(1)=3；当第二次输入6的时候a(2)=6，b(2)=a(2)=6；当第三次输入9的时候a(3)=6，b(1)=a(3)=9，跳出循环后k的值为3，将输出b(3)的值。

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

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