零儿sama:VB编程大家帮忙啊

来源:百度文库 编辑:高校问答 时间:2024/05/10 05:25:03
分别用SUB过程和FACTION过程编写程序
求S=A!+B! +C!

过程直接传入S和A,B,C
Call CalcResult(A, B, C, S)
Sub CalcResult(ByVal A!, ByVal B!, ByVal C!, ByRef S!)
S= A!+ B!+ C!
End Sub

----------------------------------------------------------

函数S = CalcResult(A, B, C)
Function CalcResult(ByVal A!, ByVal B!, ByVal C!)
CalcResult = A!+ B!+ C!
End Sub