第07章VB子过程及函数.ppt

第七章 子过程和函数 子程序和函数 如何编写和使用 子程序和函数的作用域 VB内部函数介绍 VB模块 模块的两层含义： l?工程中的资源： 一个应用程序就是一个工程，窗体模块（.frm）、类模块（.cls）、标准模块（.bas）。这是一种高层次的模块划分，它们以独立的文件方式管理。 l?子程序和函数： 一个窗体模块或标准模块也是由一些功能单元组成的，这就是子程序和函数，统称为过程（Procedure）。相对来说这是一种较低层次的模块划分。VB中提供的一些函数（比如上一章的UBound）以及事件过程就是这层含义。 VB文件的内容 每一类型的文件都可以包含过程和通用声明： 过程：可以是子过程、函数过程或事件过程。每一种过程都由代码组成。 声明：在模块级通用声明部分放置常量、变量、动态链接库等的声明。 窗体模块文件*.frm 工程中的每个窗体都有一个与之相应的窗体模块文件 窗体文件中包含： 窗体本身及窗体上放置的所有控件的属性设置 窗体级变量、常量、类型声明和外部过程 的声明 所有相关的事件过程及窗体级通用过程 说明： 同一窗体模块内的通用过程与事件过程可以相互调用 若窗体模块内的通用过程被声明为公有的，可以被其它窗体模块或标准模块中的过程调用。调用方法为：窗体名.过程名，如From1.Test。 标准模块文件*.bas 标准模块中的代码可以被工程中的所有模块，包括窗体 模块、其它标准模块，所共享。 标准模块中包含： 通用过程 没有事件过程 公共或模块级的变量、常量、外部过程和全局过程的声明 说明： 标准模块存放于独立的文件中，其扩展名为 .bas 。 标准模块中通用过程缺省为公有（Public），即工程中的任一模块均可共享、调用。 类模块文件*.cls 类模块包含用来创建对象的类定义 包含类的属性和方法的定义 7.1 子过程和函数 模块化的程序设计思想： 将程序分解成小的程序模块单元（子程序或函数），每个模块可以实现小的功能目标，它们组合起来实现大一些的功能目标。 按层次分解，主程序调用一个或多个下级子程序，这些被调用的子程序又可以调用更下层的子程序。 VB中的模块： 事件过程（Private Sub 对象名_事件名） Sub过程，又称通用过程，或子过程 Function过程，称函数 7.2 子过程 VB中的子程序分事件过程和通用过程两类： 事件过程 事件过程是VB事件驱动编程的重要机制。当VB中的某对象的某个事件被触发时，便自动调用对象的事件过程进行处理。因为事件过程的名称中包含了对象名和事件名，所以程序能够实现自动对应和调用。 通用过程 除事件过程以外的子程序都称为通用过程，通用过程由程序员自行定义和编写。一般存放到一个标准模块（文件扩展名为.BAS）中。 通用过程 定义和调用通用过程 定义 [Private | Public] [Static] Sub 过程名(参数列表) ……. End Sub 参数列表：[ByVal] 参数名 As 类型, …… 调用 Call ChangeColor(3) ChangeColor 2 事件过程 定义和调用事件过程 事件过程是VB事件驱动编程的重要机制。当VB中的某对象的某个事件被触发时，便自动调用对象的事件过程进行处理。 定义事件过程使用的是固定格式，不需要人工书写： Private Sub 对象名_事件名(参数列表) 事件响应代码 End Sub 事件过程除了由系统自动来调用之外，也可以将它看作一个普通的子程序在程序中用代码来调用，调用语法没有特殊之处。如: Call cmdAdd_Click 7.3 函数 定义和调用函数： 定义 [Private | Public] [Static] Function 过程名(参数列表) ……. End Function 过程的区别： 函数有数据类型，即返回值的类型，缺省为Variant 给函数名本身赋值，即为返回值 如果象调用过程一样调用函数，则放弃返回值 退出子过程和函数 End Sub：退出子过程 End Function：退出函数 可以在子过程体内或函数体内任何位置使用上述语句，用来结束子过程或函数 子过程和函数的参数 VB默认的参数是按地址传递(ByRef )，意味着如果过程内的参数值改变了，则调用过程时使用的变量其值也随之改变 Sub Main() Dim x As Integer x = 1 Call Test(x) ‘x的值改变了 End Sub Private Sub Test (num As Integer) num = num+1 End Sub 按值传递，则用ByVal关键字，如：