第十章过程.ppt

* “过程”就是一个功能相对独立的程序逻辑单元，是一段程序代码。使用过程可以将一个较大的程序分成若干个功能相对独立的程序模块，因而易做到模块化，另外，一个过程稍作改动，便可以为另一个程序使用。 VB中，根据过程是否有返回值，可以分成： Sub过程（子过程），无返回值。 Funtion过程（函数过程）有返回值。 一、Sub过程 事件过程（前面应用很多，略） 如：控件事件的语法 Private Sub 控件名_事件名(参数列表) ＜语句组＞ End Sub 第十章 过 程 一、Sub过程 通用过程 子过程的定义形式如下： [Public|Private][Static] Sub 子过程名([形参表]) 局部变量或常数定义 ＜语句组＞ [Exit Sub] ＜语句组＞ End Sub 说明：（1）子过程名：命名规则与变量名规则相同。子过程名不返回值，而是通过形参与实参的传递得到结果，调用时可返回多个值。 第十章 过 程 一、Sub过程 通用过程 （2）形式参数列表：形式参数通常简称“形参”，仅表示形参的类型、个数、位置，定义时是无值的，只有在过程被调用时，虚实参结合后才获得相应的值。 （3）过程可以无形式参数，但括号不能省。 （4）参数的定义形式： [ByVal｜ByRef]变量名[( )][As 类型][,…]， ByVal表示当该过程被调用时，参数是按值传递的；缺省或ByRef表示当该过程被调用时，参数是按地址传递的。 第十章 过 程 【例】 编一个交换两个整型变量值的子过程。 Private Sub Swap( X As Integer, Y As Integer) 　　Dim temp As Integer 　Temp=X : X=Y : Y=Temp End Sub 调用过程： Private Sub command1_click() 　　Dim a%,b% a=val(inputbox(“a=“)) b=val(inputbox(“b=“)) print “a=“;a,”b=“,b call swap(a,b) print “a=“;a,”b=“,b End Sub 第十章 过 程 一、Sub过程 通用过程的建立 （1）在窗体模块中建立 在代码编辑窗口中，从“对象”下拉列表选“通用”，“过程”下拉列表选“声明”。然后输入“Private Sub mysub()”。 （2）在标准模块中建立 从“工程”下拉菜单中选择“添加模块”，用对话框进行操作。 第十章 过 程 一、Sub过程 过程的调用 子过程名 [参数列表] 或 Call 子过程名(参数列表) 说明： （1）参数列表称为实参或实元，它必须与形参一一对应。 （2）调用时把实参值传递给对应的形参。其中值传递（形参前有ByVal说明）时实参的值不随形参的值变化而改变。而地址传递时实参的值随形参值的改变而改变。 （3）当参数是数组时，形参与实参在参数声明时应省略其维数，但括号不能省。 （4）调用子过程的形式有两种，即： 　　　　 Swap a,b Call Swap(a,b) 第十章 过 程 二、Function过程 VB函数分为内部函数和外部函数，外部函数是用户根据需要用Function关键字定义的函数过程，与子过程不同的是函数过程将返回一个值 。 函数过程（Function过程）的定义 [Public|Private][Static]Function 函数名([参数列表])[As类型] 局部变量或常数定义 语句块 [函数名=返回值] [Exit Function] 语句块 [函数名=返回值] End Function 第十章 过 程 二、Function过程 说明： （1）函数名：命名规则与变量名规则相同。 （2）在函数体内，函数名可以当变量使用，函数的返回值就是通过对函数名的赋值语句来实现的，在函数过程中至少要对函数名赋值一次。 （3）AS类型：是指函数返回值的类型，若省略，则函数返回变体类型值（Variant）。 （4）Exit Function：表示退出函数过程，常常是与选择结构（If或Selec