ChenYing.pptVIP

Chen Ying Visual Basic 程序设计 第十讲 第六章 过程 6.1 函数过程的定义与调用 6.2 子过程的定义与调用 6.3 参数传递 6.4 变量、过程的作用域 6.5 递归 6.6 常用算法（三） 6.7 重点和难点 过程 按照结构化程序设计原则，将复杂问题分解成若干功能模块，即过程，供事件多次调用。 使得程序简练，便于调试和维护。 除了系统提供的内部函数过程和事件过程外，用户可自定义过程： “Sub”保留字开始的为子过程 “Function”保留字开始的为函数过程 6.1 函数过程的定义和调用 函数过程形式: Function 函数过程名([参数列表]) [As 类型] 局部变量或常数定义 语句块 函数名 = 返回值 [Exit Function] 函数过程体 语句块 函数名 = 返回值 End Function 6.2 子过程 函数过程的不足： （1）不是为了获得某个函数值，而是为了某种功能的处理，如例1.1。 （2） 要获得多个结果。 1.引例: 编写一个两个数交换的过程供多次调用。 Swap （x,y）子过程的定义 主调程序调用Swap子过程 Public Sub Swap(x, y) Private Sub Form_Click() Dim t Dim a, b t = x a = 10 x = y b = 20 y = t Call Swap (a, b) End Sub Print a=;a,，b=; b End Sub 使用过程注意事项： 1. 确定自定义的过程是子过程还是函数过程 函数过程名有值（返回值），子过程名无值。 2．过程中形参的个数和传递方式的确定 过程中参数的作用是实现过程与调用者的数据通信。 从主调程序获得初值，值传递。 将结果返回给主调程序，地址传递。 3. 实参与形参结合时对应问题 个数、类型、位置、次序一一对应。 形参是值传递，对应实参可以是表达式、常量、数组元素。 形参是地址传递，对应实参只能是简单变量。 数组、记录类型、对象只能是地址传递。 6.4 变量、过程的作用域 作用域：变量、过程随所处的位置不同，可被访问的范围。 1. 过程的作用域 窗体/模块级：加Private关键字的过程，只能被定义的窗体或模块中的过程调用。 全局级：加Public关键字（缺省）的过程，可供该应用程序的所有窗体和所有标准模块中的过程调用。 2. 变量的作用域 局部变量：在过程内声明的变量，只能在本过程中使用。 窗体/模块级变量：在“通用声明”段中用Dim语句或用Private语句声明的变量，可被本窗体/模块的任何过程访问。 全局变量：在 “通用声明”段中用Public语句声明的变量，可被本应用程序的任何过程或函数访问。 若在不同级声明相同的变量名，系统按局部、窗体/模块、全局次序访问如下: Public Temp As integer 全局变量 Sub Form_Load（） Dim Temp As Integer 局部变量 Temp=10 访问局部变量 Form1.Temp=20 访问全局变量必须加窗体名 Print Form1.Temp, Temp 显示 20 10 End Sub 6.6 常用算法（三） 1. 数制转换 例6.13 将一个十进制整数m转换成 r (2－16)进制字符串。 方法：将m不断除 r 取余数，直到商为零，以反序得到结果。 3. 查找 (1) 例6.15 顺序查找 顺序查找根据查找的关键值与数组中的元素逐一比较（数组可无序） Public Sub Search(a() As Variant, ByVal key As Variant, index%) Dim i% For i = LBound(a) To UBound(a) If key = a(i) Then 找到，元素的下标在index中，结束查找 index = i Exit Sub End If Next I index = -1 找不到， index形参的值为-1 End Sub Sub birsearch(a(), ByVal low%, ByVal hig