下列程序运行后,输出结果为( )。 Dim a() a=Array(1,3,5,7,9) s=0 For i=1 To 4 s=s*10+a(i) Next i

admin2010-07-10  31

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

选项 A、1357     
B、3579
C、7531     
D、9753

答案B

解析  本题考查数组和循环的知识。在VBA中定义的数组如果没有指明下限一律默认下限为0。本题实际上每次把s*10然后加上数组的某一个元素构成一个新的数字,是从下标为1也就是第二个数组元素开始的。
转载请注明原文地址:https://kaotiyun.com/show/kBup777K
0

最新回复(0)