选择题 38.  下面程序运行后，输出结果为______。
    Dim a()
    a=Array(1, 3, 5, 7, 9)
    s=0
    For i=1 To 4
    s=s*10+a(i)
    Next i
    Print s
【正确答案】 B
【答案解析】 在VBA中定义的数组默认下限都为0。本题每次把s*10后加上数组的某一个元素构成一个新的数字，从下标为1的第二个元素开始。