单选题设执行以下程序段时依次输入2，4，6，执行结果为( )。　　Dim a(4)As Integer 　　Dim b(4)AS Integer 　　For k=0 To 2 　　　　a(k+1)=Val(InputBox("Enter data：")) 　　　　b(3 - k) =a(k + 1) 　　Next k 　　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 　　当k=3时，中断循环，执行Print语句，即要求输出b(k)的值，而k的当前值为3，即要输出的值是b(3)的值为2。