Option Base 1
Private Sub Command1_Click()
D.im a
a = Array(1, 2, 3, 4)
j = 1
F.or i = 4 To 1 Step -1
s = s + a(i) * j
j = j * 10
Next i
Print s
E.nd Sub
程序运行后,单击命令按钮后,其输出结果是
A. ) 4321
B. ) 1234
C. ) 34
D. ) 12