第7章过程..ppt

内 容 7.1 过程的概念 7.2 函数过程 7.3 子程序过程 7.4 参数传递 7.5 递归 7.6 变量、过程的作用域 7.7 常用算法（三） 7.1 过程的概念 7.1.1 引例 分析：根据求组合数的公式，这里需要3次使用计算阶乘的运算来计算组合数，而每一次运算使用For-Next循环。 编写程序代码如下： Private Sub Command1_Click() Dim n As Integer, m As Integer, i As Integer Dim fn As Long, fm As Long, fn_m As Long, c As Long n = Val(Text1.Text) 输入n m = Val(Text2.Text) 输入m 7.1.1 引例 fn = 1 For i = 1 To n 求n的阶乘 fn = fn * i Next i fm = 1 For i = 1 To m 求m的阶乘