植物园里有一个平行四边形的玫瑰园，量得玫瑰园的底是120m，高是80m，如果每平方米种9株玫瑰，这个玫瑰园一共能种多少株玫瑰？

在窗体上添加一个命令按钮，名为Command1，然后为该命令按钮编写如下事件过程，该过程执行结果为______。
Option Base 1
Private Sub Cemmand1_Click()
Dim a As Variant
a = Array(1, 2, 3, 4)
j = 1
for i = 4 To 1 Step - 1
s = s+ a(i)* j
j= j* 10
Next i
Print s
End Sub

A．4321

B．1234

C．34

D．12