假如你的函数名叫:Function Fact(n As Long) As Long
 .....
 .....
 Fact=Fact(n-1)
 '返回函数值
 .........
End Function

解决方案 »

  1.   

    给你一个最简单的例子:Function jiecheng(n As Integer) As Long
    Dim i, j As Long
    j = 1
    For i = 1 To n
        j = j * i
    Next
    jiecheng = j   '将 j 作为返回值
    End Function
      

  2.   

    直接将结果保存在与函数名同名的变量中
    eg:
    function zz() as long
       zz=结果
    end function
      

  3.   

    Public Function Factorial(n As Long) As Long
        If n > 1 Then
            Factorial = n * Factorial(n - 1)
        Else
            Factorial = 1
        End If
    End Function
      

  4.   

    真对不起各位,因为这个问题很简单,而且我说过谁先答给谁分,所以不好意思了.
    但是我还是要感谢各位的好意!
    smile将军