VB过程课件.pptVIP

* 第7章 过程 在设计一个规模较大、复杂程度较高的程序时，为简化程序设计，将程序分割成较小的逻辑部件，VB通常把这种逻辑部件称为过程。 VB中使用的过程 子程序过程(Sub Procedure) 函数过程(Function Procedure) 属性过程(Property Procedure) Sub过程不返回值 Function过程返回一个值 7. 1 Sub过程 在VB中有两种Sub过程，即事件过程和通用过程。 7．1．1 事件过程 事件过程分为窗体事件过程和控件事件过程两种。 1．定义窗体事件过程 Private Sub Form_事件名([参数列表]) [局部变量和常数声明] 语句块 End Sub Private Sub Form_Click( ) Print 这是一个VB的演示程序！ End Sub 为窗体及窗体上的各种对象编写的，用来响应由用户或系统引发的各种事件的程序代码。 窗体事件过程名 该事件过程只能在它自己的窗体模块中被调用 2．定义控件事件过程 Private Sub 控件名_事件名([参数列表]) [局部变量和常数声明] 语句块 End Sub Private Sub Cmd_Click() Print 这是一个VB的演示程序！ End Sub 例如，在窗体中设置了一个名为Cmd的命令按钮控件，它的对应单击事件过程如下： 3．建立事件过程 7.1.2 通用过程 一个应用程序中多个窗体可以共享的或一个窗体内不同的事件过程可共享的程序代码，称为“通用过程”。 通用过程 公有(Public)过程 私有(Private)过程 公有过程可以被应用程序中的任一过程调用 而私有过程只能被同一模块中的过程调用 1．定义通用Sub过程 [Private | Public][Static] Sub 过程名([参数列表]) [局部变量和常量声明] 语句块 [Exit Sub] 语句块 End Sub A. Sub过程以Sub语句开头，以End sub语句结束。在sub和End sub之间是描述过程操作的语句块，称为子程序体或过程体。 指定过程中的局部变量为“静态”变量 BYVal：表明其后的形参是按值传递参数或称为“传值”(Passed by Value)参数，若缺省或用“ByRef”替代，则表明参数是按地址传递(传址)参数或称为“引用”(Passed by Reference)参数。 B.参数列表中的参数称为形式参数,形式参数格式为： [ByVal][ByRef] 变量名 [( )] [As数据类型] 变量名[( )]：变量名为合法的VB变量名或数组名。若变量名后无括号，则表示该形参是变量，否则是数组。 Private Sub Exam1(ByVal X as Integer, Y as Integer) Y=Y+8 X=X+Y Print X,Y End Sub 2．建立Sub过程 创建通用过程的方法有两种。 6.2 Function过程定义 Function过程的语法如下： [Private | Public] [Static] Function 函数名([参数列表])[As数据类型] [局部变量和常数声明] [语句块] [函数名＝表达式] [Exit Function] [语句块] [函数名＝表达式] End Function Function过程要由函数名返回一个值。使用As数据类型选项，指定函数的类型。 在函数体内通过“函数名＝表达式”语句给函数名赋值。 C.在函数体内可以含有多个Exit Function语句，程序执行Exit Function语句时，提前退出Function过程，返回调用点。 例7—1 编写一个求n!的函数过程。 Private Function Fact(ByVal N as Integer) As Long Dim K As Ingeger Fact=1 If N=0 Or N=1 Then Exit Function else For K=1 To N Fact=Fact * K Next K End If End Functio