问题
单项选择题
下列程序在运行时输出的结果是（）。Option Base 1Private Sub Form_Click() Dim x(10) For i=1 To 10x(i)=10-i+1Next i For i=10 To 1 Step-2Print x(i)Next i End Sub
A.1 3 5 7 9
B.9 7 5 3 1
C.1 2 3 4 5 6 7 8 9 10
D.10 9 8 7 6 5 4 3 2 1
答案
参考答案：A
解析：
本题考查数组元素的赋值。数组x元素的下标从1到10，元素分别为：10-下标+1(也就是10 9 8 7 6 5 4 3 2 1)。循环结束后，从高下标端输出偶数下标的元素。