结果应为120具体是 s=120就是把1到5相乘的意意Dim a%(1 To 5), i%, s#'变量申明'-----下面代码是:组变量数组a中的每个元素一个值For i = 1 To 5
a(i) = i
Next'下面这行-----把数组通过fun函数进行计算
s = fun(a)'下面这行是输入结果在窗体上
Print " s= "; s;End Sub'下面这是计算过程的函数过程 通过FOR循环把每个元素相乘Function fun(a() As Integer)Dim t#, i%
t = 1
For i = LBound(a) ...