运行下列程序,单击窗体后输出的结果是( )。
Private Sub Form_Click()
Dim a
Dim s As Integer, i As Integer
a = Array(1, 2, 3, 4, 5, 6)
s = 1
For i = 5 To 1 Step -2
s = s * a(i)
Next i
Print s
End Sub
A、 15
B、 48
C、 120
D、 720
运行下列程序,单击窗体后输出的结果是( )。
Private Sub Form_Click()
Dim a
Dim s As Integer, i As Integer
a = Array(1, 2, 3, 4, 5, 6)
s = 1
For i = 5 To 1 Step -2
s = s * a(i)
Next i
Print s
End Sub
A、 15
B、 48
C、 120
D、 720
B
VIP截止日期:2025-01-01 00:47:39
←请使用支付宝扫码支付VIP截止日期:2025-01-01 00:47:39
←请使用微信扫码支付