VB编程～求S=A!+B!+C!阶乘的计算分别用Sub过程和Founcti求S=A!+B!+C!阶乘的计算分别用Sub过程和Founction过程两种方法来实现.

VB编程～求S=A!+B!+C!阶乘的计算分别用Sub过程和Founcti求S=A!+B!+C!阶乘的计算分别用Sub过程和Founction过程两种方法来实现.
VB编程～求S=A!+B!+C!阶乘的计算分别用Sub过程和Founcti
求S=A!+B!+C!阶乘的计算分别用Sub过程和Founction过程两种方法来实现.

VB编程～求S=A!+B!+C!阶乘的计算分别用Sub过程和Founcti求S=A!+B!+C!阶乘的计算分别用Sub过程和Founction过程两种方法来实现.
用Sub过程实现：
Private Sub Command1_Click()
Dim t As Long
s = 0
fac0 1,t
s = s + t
fac0 2,t
s = s + t
fac0 3,t
s = s + t
Print "s=1!+2!+3!="; s
End Sub
Public Sub fac0(n As Integer,t As Long)
t = 1
For i = 2 To n
t = t * i
Next i
End Sub
用Founction实现：
Private Sub Command2_Click()
s = fac(1) + fac(2) + fac(3)
Print "s=1!+2!+3!="; s
End Sub
Public Function fac(n As Integer) As Long
t = 1
For i = 2 To n
t = t * i
Next i
fac = t
End Function