现有如下一段程序:
Option Base 1
Privalc Sub Command1 Click( )
Dim a
a=Array(3,5,7,9‘)
x=1
For i=4,10 j Step-1
s=s+a(i)*X
x=x*10
Next i
Print s
End Sub
执行程序,单击Command1命令按钮键,执行上述事件过程,输出结果是( )。
A.9753 B.3579 C.35 D.79
参考答案:
答案解析:
有如下程序:Option Base 1Private Sub Command1 Click( )Dim arr(10
有如下程序:Option Base 1Private Sub Command1 Click( )Dim arr(10)arr=Array(10,35