问题
单项选择题
设执行以下程序段时依次输入2，4，6执行结果为
Dim a(4) As Integer,b(4) As Integer
For k =0 To 2
a(k + 1) = Val(InputBox( "Enter data:" ) )
b(3 - k) =a(k + 1)
Next
Print b(k)
A．2
B．4
C．6
D．0
答案
参考答案：A
解析： 此程序段开始声明了两个整型数组a和b，其长度均为4。
程序通过For…Next语句为其赋值，a(k+1)=Val (InputBox("Enter data："))，b(3-k)=a(k+1)。
当k=0时，输入2，a(1)二b(3)：2；
当k=1时，输入4，a(2)；b(2)：4；
当k=2时，输入4，a(3)二b(1)：6；
当L=3时，中断循环，执行Print语句，即要求输出 b(k)的值，而k的当前值为3，即要输出的值是b(3)，其值为2。