问题详情

现有如下一段程序：
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请帮忙给出正确答案和分析，谢谢！