[填空题] 下列程序运行后的输出结果是 【9】 。 Private Sub f(k，s)s=1For j=1 To k s=s*jNext End Sub

[填空题] 下列程序运行后的输出结果是 【9】 。

Private Sub f(k，s)

s=1

For j=1 To k

s=s*j

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=9