《Visual Basic程序设计》第6章-邵洁主编-第四版.pptVIP

递推 回归 在递归处理中，用栈来实现。栈中存放形参、局部变量、返回地址。 递推过程：每调用自身，当前参数压栈，直到达到递归结束条件。 回归过程：不断从栈中弹出当前的参数，直到栈空。 递归算法设计简单，但消耗的机时和占据的内存空间比非递归大。 思考： 若上述fac函数中： If n = 1 Then fac = 1 即仅有语句： fac = n * fac(n - 1) 或 n=0 程序运行将造成何结果？由此可见构成递归的结构如下： 递归结束条件及结束时的值； 能用递归形式表示，并且递归向终止条件发展。 Visual Basic 程序设计 例 利用递归求最大公约数 Private Sub Form_Click() Print gcd(10, 4) End Sub Visual Basic 程序设计 Public Function gcd(m As Integer, n As Integer) As Integer If (m Mod n) = 0 Then gcd = n Else gcd = gcd(n, m Mod n) End If End Function 分析以下子过程的功能 ，当n=100,r=8,结果是多少？ Public Sub f(ByVal n %, ByVal r %) ① If n r Then Call f(n \ r, r) ② Print n Mod r; ③ End Sub Private Sub Command1_Click() Call f(100, 8) End Sub 显示结果 1 4 4 Visual Basic 程序设计 递归常见错误：递归调用出现“栈溢出” 递归调用时，其中的参数要向终止方向收敛。 如下求阶乘的递归函数过程： Visual Basic 程序设计 Public Function fac(n As Integer) As Integer If n = 1 Then fac = 1 Else fac = n * fac(n - 1) End If End Function Private Sub Command1_Click() Print “fac(5)=”；fac(5) Print “fac(5)=”；fac(-5) ‘ 栈溢出 End Sub 1.确定自定义的过程是子过程还是函数过程 函数过程名有值，子过程名无值。 过程有一个返回值，则使用函数过程； 若返回多个值或无返回值，一般使用子过程。 2．过程中形参的个数和传递方式的确定 过程中参数的作用是实现过程与调用者的数据通信。 (1)从主调程序获得初值，值传递。 (2)将结果返回给主调程序，地址传递。 重点和难点 Visual Basic 程序设计 3. 实参与形参结合时对应个数、类型、位置、次序一一对应。 形参是值传递，对应实参可以是表达式、常量、数组元素。 形参是地址传递，对应实参只能是简单变量。  数组、记录类型、对象只能是地址传递。 4. 变量的作用域问题 局部变量、静态变量、全局变量特点、作用 5. 递归调用出现“栈溢出” 递归过程中有终止的条件和终止时的值或某种操作 每递归调用一次，其中的参数要向终止方向收敛。 Visual Basic 程序设计 Visual Basic 程序设计 1.定义： ⑵ 利用代码窗口直接输入 把插入点放在所有过程之外 直接输入函数过程 Public Function area(x!,y!,z!) as single Visual Basic 程序设计 2.定义格式： Public Function 函数名（形参列表)[As 数据类型] 定义变量或常量 语句序列 函数名 = 表达式 End Function 如: Public Function area(x As Single,y!,z!) As Single c=0.5*(x+y+z) area=sqr(c*(c-x)*(c-y)*(c-z)) End Function 注意： 在函数体内，函数名最少赋值一次 形参列表没有值，只代表参数的个数、类型、位置 函数过程无参数，括号不能省略 (变量名?[As?类型]?,?变量名?[A