第29题: [单项选择]设执行以下程序段时依次输入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)。