基本思想： 递归处理一般用栈来实现，每调用一次自身，把当前参数压栈，直到递归结束条件；然后从栈中弹出当前参数，直到栈空。
递归条件：（1）递归结束条件及结束时的值；（2）能用递归形式表示，且递归向终止条件发展。

例：编fac(n)=n! 的递归函数

代码如下（通过定义一个自定义函数fac来实现）：
      Function fac(n As Integer) As Integer
          If n = 1 Then
              fac = 1
          Else
　　　　      fac = n * fac(n - 1)
          End If
　　　End Function