第5章--过程的创建和使用-Visual-Basic从入门到精通(第3版)课件.ppt

《第5章--过程的创建和使用-Visual-Basic从入门到精通(第3版)课件.ppt》由会员分享，可在线阅读，更多相关《第5章--过程的创建和使用-Visual-Basic从入门到精通(第3版)课件.ppt（37页珍藏版）》请在淘文阁 - 分享文档赚钱的网站上搜索。

1、 第第5章章 过程的创建和使用过程的创建和使用01 认识过程认识过程02 事件过程事件过程03 子过程子过程0506 参数的传递参数的传递VB 6.0的帮助系统的帮助系统 嵌套过程嵌套过程04函数过程函数过程0708 递归过程递归过程 属性过程属性过程1 认识过程认识过程认识过程认识过程“过程”就是一个功能相对独立的程序逻辑单元，即一段独立的程序代码，VB应用程序一般都是由过程组成的，如下图所示。VB中的过程分为事件过程和通用过程。其中事件过程是当发生了某个事件（如单击鼠标的Click事件、窗体载入的Load事件、控件发生改变的Change事件）时，对该事件作出响应的程序段。建立事件过程建立事

2、件过程一个控件的事件过程将控件的（在Name属性中规定的）实际名称、下划线（_）和事件名组合起来。例如，如果希望单击一个名为cmdPlay的命令按钮之后调用事件过程，则要使用cmdPlay_Click过程。一个窗体事件过程将词汇Form、下划线和事件名组合起来。例如，Form_Click过程。下面打开VB，看下如何建立事件过程。调用事件过程调用事件过程事件过程可以使用Call语句进行调用，也可以直接使用过程名称调用。1使用使用Call语句语句使用Call语句调用事件过程，语法格式如下。Call()举例：举例：窗体载入时，使用Call语句调用命令按钮（Command1）的Click事件过程。打开

3、VB，编写代码。调用事件过程调用事件过程2直接使用过程名称直接使用过程名称调用事件过程，语法格式如下。建立子过程建立子过程要使用子过程，首先就要建立它。建立子过程有两种方法。1直接在代码窗口中输入打开窗体或标准模块的代码编辑窗口，将插入点定位在所有现有过程的外面，然后输入子过程即可。语法格式如下：Private|PublicStaticSub 子过程名(参数列表)Exit SubEnd Sub建立子过程建立子过程2使用“添加过程”对话框如果认为手工输入子过程比较麻烦，那么也可以通过“添加过程”对话框在代码编辑窗口中自动添加。打开VB，进行演示。举例：举例：打开VB，建立SubComputeAr

4、ea过程，在“名称”文本框中输入SubComputeArea，选择范围是“私有的”。单击“确定”按钮，代码编辑窗口中就会出现一个名为SubComputeArea的过程。调用其他模块中的子过程调用其他模块中的子过程1调用窗体中的子过程所有窗体模块的外部调用必须指向包含此过程的窗体模块。如果在窗体模块Form1中包含MySub子过程，则可使用下面的语句调用Form1窗体中的子过程。2调用类模块中的子过程与调用窗体中的子过程类似，在类模块中调用子过程要调用与过程一致并且指向类实例的变量。例如，DemoClass是类Class1的实例。Call Form1.MySub(参数列表)Dim DemoCla

5、ss as New Class1DemoClass.SomeSub4 函数过程函数过程建立函数过程建立函数过程同样，使用函数过程也要先建立。方法也有两种，一种是通过“添加过程”对话框，初步建立函数过程的框架。这与前面介绍的子过程的建立方法基本一样，只是在“类型”栏中选中“函数”单选按钮。另一种方法是使用Function语句，其语法格式如下。Private|PublicStatic Function 函数名(参数列表)As 类型Exit FunctionEnd Function函数过程与子过程的区别函数过程与子过程的区别在对比函数过程和子过程之前，先来看一个实例。将前面介绍的有关计算面积的子过程

6、改为用函数过程。打开VB，编写代码。举例：举例：从这两个例子可以看出函数过程与子过程的区别，即函数过程可以通过过程名返回值，但只能返回一个值；子过程不能通过过程名返回值，但可以通过参数返回值，并可以返回多个值。不过，两者也有一些相同点，即子过程与函数过程都可以修改传递给它们的任何变量的值。5 参数的传递参数的传递认识参数认识参数在调用一个有参数的过程时，参数就是在本过程中有效的局部变量，通过“形参和实参结合”达到传递数据的目的。例如下面的代码：定义一个用于计算面积的Function函数过程Private Function SubComputeArea(Length As Long,TheWid

7、th As Long)SubComputeArea=Length*TheWidthEnd FunctionPrivate Sub CmdResult_Click()调用计算面积的函数过程SubComputeArea lblArea.caption=SubComputeArea(txtLength,txtWidth)End Sub形式参数实际参数认识参数认识参数1形参从上述代码可以看出被调用过程中的形式参数就是形参，出现在Sub过程和Function过程中。形参列表中的各参数之间用逗号隔开，可以是变量名和数组名，但是定长字符串不可以。2实参从上述代码可以看出在调用Function过程时，调用了两

8、个参数将数据传递给了前面定义的形参，那么这两个参数就是实际参数，也就是实参。实参列表与形参列表的对应变量名可以不同，但实参和形参的个数、顺序以及数据类型必须相同。因为“形实结合”是按照位置结合的，例如上述代码第一个实参txtLength与第一个形参Length结合，第二个实参txtWidth与第二个形参TheWidth结合。认识参数认识参数3参数的数据类型（1）创建过程时，如果没有声明形参的数据类型，那么数据类型默认为变体（Variant）型。（2）如果实参数据类型与形参数据类型不一致，则VB会按要求对实参进行数据类型转换，然后将转换后的值传递给形参。4使用可选的参数在定义过程时，参数也是可选

9、的，只要参数列表中含有Optional关键字即可。语法格式如下：Sub|Function 过程名(Optional 变量名)举例：举例：将函数过程SubComputeArea中的两个参数改为可选参数，打开VB，编写代码。参数按值和按地址传递参数按值和按地址传递2按地址传递参数按地址传递使用ByRef关键字定义参数。在定义过程时，如果没有ByVal关键字，默认是按地址传递参数。所谓按地址传递参数，就是把形参变量的内存地址传递给被调用的过程。形参和实参具有相同的地址，即形参和实参共享同一段存储单元。举例：举例：将上一例子按值传递改为按地址传递，打开VB，编写代码，被调用的子过程test的代码不变。

10、数组参数数组参数所谓数组参数，就是在定义过程时，用数组作为形参出现在过程的形参列表中。其语法格式如下：举例：举例：下面使用函数过程Average计算员工平均年龄，打开VB，编写代码。形参数组名()As 数据类型形参数组对应的实参也必须是数组，数据类型与形参一致，实参列表中的数组不需要使用括号“()”。过程传递数组只能按地址传递，即形参与实参共享同一段内存单元。对象参数对象参数除了变量和数组可作为实参传递给过程中的形参，Visual Basic还允许对象（如窗体、控件等）作为实参传递给过程中的形参。对象参数可以采用引用方式，也可以用传递的方式，即在定义过程时，在对象参数的前面加ByVal。举例：

11、举例：下面通过子过程objectEna设置TextBox和CommandButton控件不可用，打开VB编写代码。嵌套过程嵌套过程举例：举例：在VB中，一个过程中就不能包含另外一个过程了。但是VB也提供了嵌套调用过程的方法，也就是在一个过程中可以调用另一个过程，在子过程中还可以调用另一个子过程，这种程序结构的过程就是嵌套过程。简单地说，嵌套过程就是指一个被调用的过程又调用了一个或若干个过程。例如：例如，将一个Variant型变量使用Array函数赋值成Variant型数组。代码如下：Sub mySub1()End SubSub mySub2()Call mySub1End SubPrivate

12、 Sub Form_Load()Call mySub2End Sub举例：举例：下面通过嵌套过程实现数据排序，打开VB看一段代码。7 递归过程递归过程8 属性过程属性过程使用属性过程建立类的属性使用属性过程建立类的属性建立类的属性主要使用Property Let语句和Property Get语句。下面分别介绍这两个语句。1Property Let语句Property Let语句用于声明Property Let过程的名称、参数以及构成其主体的代码，该过程用于给一个属性赋值。语法格式如下：Public|Private|Friend Static Property Let (,Value)Exit

13、Property End Property使用属性过程建立类的属性使用属性过程建立类的属性2Property Get语句Property Get语句用于声明Property Get过程的名称、参数以及构成其主体的代码，该过程获取一个属性的值。语法格式如下：Public|Private|Friend Static Property Get name(arglist)As type Exit Property End Property下面使用Property Let过程和Property Get过程建立Class1类的标记属性，打开VB编写代码。举例：举例：使用类属性使用类属性下面介绍给类的属性赋

14、值和读取类的属性值。给类的属性赋值和读取类的属性值与窗体和控件基本相同，但有一点区别，即给类的属性赋值和读取类的属性值，要先声明类，然后使用Set语句和New关键字，创建该类的一个新实例。使用前面实例建立的类的属性。当窗体载入时，为Class1类的标记属性赋值，然后获取该值，并显示出来，打开VB编写代码。举例：举例：只读属性和对象属性只读属性和对象属性要创建只读属性，很简单，只要省略Property Let或（对于对象属性）Property Set即可。若要创建一个读写对象属性，应使用Property Get和 Property Set语句。例如下面的代码：Private mwdgWidget As WidgetPublic Property Get Widget()As Widget Set Widget=mwdgWidgetSet语句被用来返回一个对象引用End PropertyPublic Property Set Widget(ByVal NewWidget As Widget)Set mwdgWidget=NewWidgetEnd Property总结总结本章主要介绍了事件过程、子过程、函数过程、参数的传递、嵌套过程、递归过程和属性过程。读者应重点掌握子过程和函数过程；至于嵌套过程、递归过程和属性过程，对于初学者了解即可。