用VB编写一个求N！的Function过程
3个回答
展开全部
public function N(num as integer) as integer
dim i as integer
N=1
for i=1 to num
N=N*i
next
end function
dim i as integer
N=1
for i=1 to num
N=N*i
next
end function
本回答被网友采纳
已赞过
已踩过<
评论
收起
你对这个回答的评价是？
展开全部
private Function Jc(x As Integer)
s = 1
For i = 1 To x
s = s * i
Next i
Jc = s
End Function
已赞过
已踩过<
评论
收起
你对这个回答的评价是？
展开全部
Function s(x As Integer)
If x = 1 Then
s = 1
Else
s = x * s(x - 1)
End If
End Function
递归
已赞过
已踩过<
评论
收起
你对这个回答的评价是？
更多回答（1）
推荐律师服务：
若未解决您的问题，请您详细描述您的问题，通过百度律临进行免费专业咨询
