编程实现1*2*3*…*n的积

如题所述

 Private Function jisuan(ByVal n As Integer) As Long
        Dim result = 1
        For i = 1 To n
            result *= i
        Next
        Return result
    End Function
温馨提示:答案为网友推荐,仅供参考
相似回答