若有以下程序，当程序运行后，单击命令按钮，则输出的结果为( )。 Private Sub Comma

未知题型

若有以下程序，当程序运行后，单击命令按钮，则输出的结果为( )。 Private Sub Command1_Click() Dim a%(1 To 4), b%(3 To 6), i%, s1#, s2# For i= 1 To 4 a(i) = i Next i For i=3 To 6 b(i) = i Next i s1 = Factorial (A) s2 = Factorial (B) Print 's1='; s1; 's2='; s2 End Sub Function Factorial(a() As Integer) Dim t#, i% t=1 For i = LBound(A)To UBound(A) t = t * a(i) Next i Factorial = t End Function
A.s1=360 s2=24
B.s1=24 s2=360
C.s1=24 s2=24
D.s1=360 s2=360

A.s1=360
B.s1=24
C.s1=24
D.s1=360

【参考答案】

B
解析：Factorial函数的作用是计算参数数组a元素的累计乘积，即将数组a的元素从下界到上界循环相乘。在主......

(↓↓↓ 点击下方‘点击查看答案’看完整答案 ↓↓↓)