第8章过程.pptVIP

第8章 过程 8.1Sub过程 8.2Function过程 8.3参数传递 8.4对象参数 8.5过程的嵌套与递归 * * VB 过程分类： 事件过程 ：发生某个事件时作出响应的程序段 通用过程：不同事件过程需要共同的程序段 过程概念： 公用的完成某一特定功能的程序段 或可供其它程序调用的、独立的程序段 V B中通用过程种类： Sub过程：子程序过程 Function过程：函数过程 Property过程 8.1.1 Sub过程的建立（两种方法） 1．通过菜单命令 选择“工具”菜单下的“添加过程”菜单项，打开“添加过程”对话框 1) 在“名称”框中输入过程名(过程名中不允许有空格)。 2) 如要创建Sub过程，在“类型”组中选择“子程序”。 3) 在“范围”组中根据要创建的过程的作用域进行选择，如果要创建一个公共级的全局过程，则选择“共有的”；如果要创建一个模块级的局部过程，则选择“私有的”。 8.1 Sub过程 2．在“代码”窗口自定义Sub过程 自定义Sub过程的形式如下： [Static][Public|Private]Sub子过程名([参数列表]) 局部变量的定义 语句 End Sub l) Sub过程以Sub开头End Sub结束，Sub和End Sub之间“过程体” 2) Sub过程不能嵌套定义 3）格式中各参量的含义 ： ①Static：局部变量在内存中的默认存储方式（静态) 使用了Static，每次调用过程，局部变量的值保留 上一次的值 ②Private：私有过程，只能被本模块中的其它过程访问 ③Public：公有过程，可在程序的任何地方调用 各窗体通用的过程通常在标准模块中用Public定义 ④过程名：是一个长度不超过255个字符的标识符。在同一个模块中，同一个标识符不能既用做Sub过程名，又用做Function过程名 ⑤参数表列：调用时传送给该过程的简单变量名或数组名，名字之间用逗号隔开 每个参数的格式为： [ByVal］变量名[( )] [As数据类型] 省略“As数据类型”，则默认为Variant 加上“ByVal”，表明该 参数是“传值”参数，按值传递 没有加“ByVal”的参数称为“引用”参数 ，按地址传递 “参数表列”中的参数称为“形式参数”，简称“形参” 调用Sub过程有两种方法： 1．用Call语句调用Sub过程 格式：Call过程名［(实际参数)］ 例如：Call Max(a, b) 2．把过程名作为一个语句来使用（即省略关键字Call） 过程名［(实际参数1)， (实际参数2) ，……］ 例如： Max a, b 例如调用一个求面积的过程： 8.1.2 Sub过程的调用 Private Sub Area(r As Single) Dim Area As Single Area = 4 * 3.1415926* r * r MsgBox Area of the Circle is Area End Sub Private Sub form_Click( ) Dim r As Single r = InputBox(Please Input the Radius) Call Area(r) r = InputBox(Please Input the Radius) Area r End Sub 要求过程的执行返回一个值时，用Function过程 8.2.1 Function过程的定义 函数过程的定义格式是： [Private | Public][Static]Function 函数名([形式参数])[As 类型] [语句序列] [函数名=表达式] [Exit Function] [语句序列] End Function 8.2 Function过程 1) 如果没有使用Public或Private显式指定，则Function过程缺省为公用（Public）;如果没有使用Static，则局部变量的值在调用之后不会保留 2) “As 类型”指定返回值的类型，缺省为Variant类型 3) Function过程的定义不能嵌套,但Function过程可以是递归的，也就是说，该过程可以调用自己来完成某个特定的任务 注意:递归可能会导致堆栈上溢,通常Static关键字和递归的Function过程不在一起