单选题
下面程序运行后,输出结果为( )。 Dim a() a=Array(1,3,5,7,9) S=0 For i=1 to 4 S=s*10+a(i) next i pnnt S
【正确答案】
B
【答案解析】解析:在VBA中定义数组如果没有指明下限一律默认为0,因此a=Array(1,3,5,7,9) 即a[0]=1,a[1]=3,a[2]=5,a[3]=7,a[4]=9。第一次循环时,s=0}10+a[1]=3;第二次循环时,s=3*10+a[2]=35;第三次循环时,s=35*10+a[3]=357;第四次循环时,s=357*10+a[4]=3579,正确答案为B选项。