问题
单项选择题
设执行以下程序段时依次输入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。