单项选择题

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