第7章_____过程.pptVIP

第7章 过程 教学目标 掌握过程的定义及其引用 熟悉异常处理机制 熟悉递归算法 7.1 过程 在已经学习过的事件过程中，事件过程是当发生某个事件时，如单击命令按钮，对该事件作出响应的程序段。有些情况下，多个不同的事件过程可能要执行一段相同的程序代码，那么可以将这一段代码抽出来，建立一个独立的过程，这样的过程称为通用过程，供事件过程或其他通用过程调用。 在Visual Basic中，通用过程分为两类：子程序过程和函数过程，前者也称为Sub过程，后者称为Function过程。 7.1.1 Sub过程的定义 下面是通用过程的建立和使用。 Sub过程即子程序，是由Sub... End Sub定义的过程。定义过程的格式如下： [Static ] [Private ] [Public] Sub 过程名（[参数表]） 语句序列 End Sub Sub过程定义以Sub（除前面的Static、Private和Public外）开始，以End Sub结束，中间是描述过程功能的语句序列，称为过程体。 Sub前面的Static、Private和Public指定过程或其中定义的变量的有效范围，有关细节后面介绍。 过程名与变量的命名规则相同，不要与Visual Basic中的关键字重名，也不要与同级的变量同名。 参数表指定在调用该过程时，应该传递的参数的个数和类型。参数表中可以包含多个参数项，相邻的两个参数项之间用逗号隔开。每个参数项的形式如下： ByVal | ByRef 参数名[( ) ] [ As 类型] 这里的参数名是一个合法的变量名，如果参数做为数组来使用，在其名的后面应该加一对括号。 类型指定参数的数据类型，可以是Integer，Long，Single，Double，String，Variant或用户定义的其他类型。 如果省略“As 类型名”则默认为Object。变量名前的ByVal表明参数是按照值来传递，ByRef按照地址来传递。有关细节，本章后面将做详细介绍。这里的参数在定义时并没有分配存储单元，只有在运行该过程时才分配，所以也称为形式参数。 End Sub表明过程的结束。每个Sub过程应该有一个End Sub语句，当程序执行到End Sub时，将结束该过程的运行。在过程体中，还可以包含一个或多个Exit Sub语句，当程序运行到Exit Sub语句时，也结束过程的运行。 Sub过程不能嵌套，即不能在Sub过程中再定义其他的Sub或Function过程。 例如，定义计算和打印矩形面积的Sub过程如下： Sub area(ByRef intA As Integer, ByRef intB As Integer) Dim intS As Integer intS = a * b TxtOutput.Text = The area is ＋ intS.ToString（） End Sub 该过程的名字为area，包含两个参数a和b，均为Integer型。过程可以没有参数，下面是一个不带参数的过程定义： Sub sums( ) Dim intA As Integer Din intB As integer intA = 3 intB ＝ 7 TxtOutput.Text = intA + intB = intA + intB End Sub 7.1.2 调用Sub过程 调用Sub过程，即执行该过程中的代码。调用Sub过程的形式如下： 过程名([实际参数表]) 其功能是：运行该过程名对应的过程。 实际参数表是传递给该过程的诸参数，实际参数也简称为实参。实参可以是常量、变量或表达式。相邻的两个实参之间用逗号隔开。实参的个数、顺序、类型和形参要一一对应。 调用的执行过程是：首先将实参传递给形参，然后执行过程体。当过程运行结束后，从调用该过程的语句的下一句处继续执行。例如，要调用前面定义的过程area，使用如下的程序段： Dim intX As Integer Dim intY As Integer intX = 5 intY = 7 area(intX, intY) 当执行该程序段时，首先给变量x和y赋值，接着以x和y为实参，调用过程area。 调用过程是首先将实参x传递给形参a，将实参y传递给形参b，然后执行过程area的过程体，即该过程中的诸语句。当执行到End Sub时，过程的运行结束，返回到调用该过程的语句的下一句，从该处继续程序的运行。要调用前面定义的无参过程sums，可用如下的语句： sums( ) 7.2 Function过程 Sub过程不返回值，且以语句的形式调用。Function过程要返回一个值，调用方式是以表达式的形式出现