Excel中有现成的阶乘运算函数,即Fact()。
这里,主要是体验(验证)一下VBA的递归算法的实现。
效果:
代码:
Function factC(ByVal n As Integer) As Long
If n <= 1 Then
factC = 1
Else
factC = factC(n - 1) * n
End If
End Function
可见,VBA同样是支持递归算法的(目前用过的语言都支持递归,不知道有没有语言不支持的递归的)
目前为止,工作中还真没用到过递归算法,三重循环倒是用过。