问题
填空题
下列程序运行后的输出结果是 (9)
Private Sub f(k,s)
s=1
For i=1 To k
s=s*i
Next
End Sub
Private Sub Command1_Click()
Sum=0
For i=1 To 3
Call f(i,s)
Sum=Sum+s
Next
Print Sum
End Sub
答案
参考答案：I
解析： 本题考查的重点是在子过程的调用过程中，虚实参数的传送问题，变量s按十传送。子过程f()求n!，sum的计算过程为1!+2!+3!=1+2+6=90