663-第8章 过程.pptVIP

第8章 过程 8.1 子过程 8.2 函数过程 8.3 参数传递 8.4 过程的应用 8.5 键盘和鼠标事件过程 概述 　事件过程 系统过程 　　　　　　　　内部函数过程 　　　　　　　　　通用过程 自定义过程 　　　　　　　　　自定义函数过程 概述 　事件过程 Sub过程 　　　　　　　　 通用过程 　　　　　　　　 内部函数过程 函数过程 　　　　　　　　自定义函数过程 8.1 子过程 8.1.1 通用过程的定义 8.1.2 子过程的调用 8.1.1 通用过程的定义 （1） 1. 通用过程的语法格式 通用过程的语法格式如下： [Public | Private] [Static] Sub 过程名([形参表]) [局部变量或常数声明] [语句块] [Exit Sub] [语句块] End Sub 8.1.1 通用过程的定义 （2） 说明： （1）[Public | Private]：可选。指定过程的作用范围。若省略，则默认为Public（全局）。 （2）Static：可选。指定本过程内的所有局部变量均为静态变量。 （3）过程名：命名规则与变量命名规则相同。无参数时，过程名后的括号不能省略。 （4）形参表：形参表类似于变量声明，指明本过程被调用时传送给本过程的变量个数和类型。若有多个变量，各变量之间用逗号间隔。形参表中出现的参数称为形式参数，简称形参。每个形参的格式为： [ByVal | ByRef] 形参名[()][ As 类型] 8.1.1 通用过程的定义 （3） ByVal表示该参数按值传递，ByRef表示该参数按地址传递（默认）。形参名必须是合法的变量名或数组名（后面加括号）。类型代表该参数的数据类型，默认为Variant。不能用定长字符串变量或定长字符串数组作为形式参数，但是可以在调用过程时用简单定长字符串变量作为“实际参数”，VB将其转换为变长字符串变量传递给过程。 （5）Exit Sub语句表示立即退出子过程，通常将其置于选择结构中。 （6）在过程内不能再定义过程，但可以调用其他过程。 8.1.1 通用过程的定义 （4） 2. 通用过程的创建 创建通用过程有两种方法：使用“添加过程”对话框；直接在代码编辑器窗口中输入过程代码。 （1）使用“添加过程”对话框 步骤如下： ① 打开要添加过程的代码编辑器窗口。 ② 执行【工具】菜单【添加过程】命令，打开如图8.1所示的【添加过程】对话框。 8.1.1 通用过程的定义 （5） ③ 在【名称】文本框中输入过程名。在【类型】框架中选择过程类型，其中【子程序】表示建立Sub过程，【函数】表示建立Function过程。在【范围】框架中选择范围，相当于使用Public或Private关键字。 ④ 单击【确定】按钮后，在代码编辑器窗口中将出现如图8.2所示的过程模板。 （2）直接在代码编辑器窗口中输入 在代码编辑器窗口中，将插入点放在已有过程的外面，按照规定的语法格式输入过程名和参数，系统会自动产生最后一行语句End Sub。 8.1.1 通用过程的定义 （6） 图8.1 【添加过程】对话框 图8.2 过程模板 8.1.2 子过程的调用 （1） 子过程的Sub与End Sub之间的语句序列称为过程体，每次调用子过程都会执行过程体中的语句。在程序中，既可以调用通用过程，也可以调用事件过程。 1. 调用通用过程 调用子过程有两种方法：使用Call语句；直接使用过程名。语法格式如下： Call 过程名[(实参表)] 或者： 过程名 [实参表] 8.1.2 子过程的调用 （2） 说明： （1）实参表是实际参数（简称实参）列表，若有多个参数，参数之间要用逗号间隔。各实参与形参在参数列表中的位置相互对应，实参与对应位置的形参必须是同一类型，可以是常数、变量、数组元素或表达式。 （2）当用Call语句调用子过程时，若有参数，则参数必须放在圆括号内；若无参数，则省略过程名后的圆括号。 （3）若不使用Call关键字，则过程名后不能加括号。若有参数，则参数直接跟在过程名之后，参数与过程名之间用空格间隔，参数与参数之间用逗号间隔。 8.1.2 子过程的调用 （3） 【例8.1】编写一个计算圆面积和周长的通用过程。在窗体的单击事件中通过InputBox函数输入圆的半径，然后调用该过程计算圆面积和周长，计算结果通过消息对话框输出。程序运行结果如图8.2所示。 8.1.2 子过程的调用 （4） 【例8.2】创建一个简单的文本编辑程序，利用通用过程控制用于