问题
单项选择题
下面程序运行后，输出结果为( )。
Dim a()
a=Array(1，3，5，7，9)
s=0
For i=1 To 4
s=s*10+a(i)
Next i
Printf s
A．1357
B．3579
C．7531
D．9753
答案
参考答案：B
解析： 在VBA中定义的数组默认下限都为0。本题每次把s*10后加上数组的某一个元素构成一个新的数字，从下标为1的第二个元素开始。