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