下面程序运行后,输出结果为( )。 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

admin2013-01-07  4

问题 下面程序运行后,输出结果为(    )。
    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的第二个元素开始。
转载请注明原文地址:https://kaotiyun.com/show/Mkup777K
0

最新回复(0)