第十一章 面向对象程序设计语言VBA.pptVIP

第十一章  面向对象程序设计语言－VBA ;内容;编程的基本概念; 表示实体，如一个学生等。一种对象包含多种属性，如学号、姓名、入学总分、所在班级等。对象还带自己的方法，即对象所能执行的行为，如查询学生情况等。;属性和方法用于描述了对象的性质和行为。 引用格式：对象.属性 或 对象.方法;事件 ;Option Compare Database Private Sub bClear_Click() Me!tText.SetFocus 聚焦文本框 Me!tText.Text =“ ” 清空文本框表面文字 End Sub;过程、子程序和函数; 子程序是执行一系列操作的过程。使用时可多次调用，若模块有错误，改正之后，则程序中所有引用它的地方都得到维护。 定义格式： [Public|Private][Static] Sub 子程序名([参数]) [一组语句] [Exit Sub] [一组语句] End Sub Public 所有模块的所有其他过程都可调用 Private 适用于同一模块中的其他过程 Static 过程中的变量在模块打开期间始终有效 ; 函数也是执行一系列操作的程序段，而且可以使用函数名返回一个值。使用时同样可多次调用，若模块有错误，改正之后，则程序中所有引用它的地方也都得到维护。 定义格式： [Public|Private][Static] Function 函数名([参数])[As 数据类型] [一组语句] [Exit Function] [函数名＝表达式] End Sub Public 所有模块的所有其他过程都可调用 Private 适用于同一模块中的其他过程 Static 过程中的变量在模块打开期间始终有效 ;计算圆的面积，并加入错误处理代码 Public Function Area(R As Single) As Single On Error GoTo Err_Handle Area＝3.14159*R*R Exit_Handle: Exit Function Err_Handle: MsgBox Err.Description Resume Exit_Handle End Function 函数的调用： 计算半径为3的圆的面积：Area(3) 变量做实参：Dim MyR As Single Area(MyR); 标准模块：包含在数据库窗口的模块对象列表中，其中有通用过程和常用过程，这些过程不与Access数据库文件中的任何对象相关联。 类模块：包含类的定义（属性和方法）的模块，有三种基本形式：窗体类模块、报表类模块和自定义类模块，它们各自与某一窗体或报表相关联。 类模块也可脱离窗体或报表而单独存在，这种类模块可在数据库窗口的模块页中显示。;VBA编程环境;窗口工具条;工程、属性、代码窗口;变量、常量与数据类型;VBA主要数据类型; 数值型数据的符号： 整型 %、长整型 、单精度型 !、双精度型 # 例：1.5# 78 % 3.33! 8 布尔型数据的值：两种值True和False，其他数值类型转换为布尔型时，0变成False，其他值均为True。布尔型转换为其他型时，False成为0，True成为-1。 日期型变量的值：日期值用#括起来，如 #2006-7-1# 日期变量以短日期格式显示。其他数值型变量转换为日期型时，小数点左边的值为日期，右边值为时间。午夜为0，中午为0.5，负整数为1899年12月30日前。; Variant (变体)数据类型：若未给变量指定数据类型， Access自动指定其为Variant类型。 Variant可包含除定长String数据及用户定义类型之外的 任何种类的数据。也可包含Empty、Error、Nothing 及 Null特殊值。 变量的初始化：声明而未赋值的变量的值为： -数值变量初始化为0 -变长字符串为零长度串，定长字符串都填上零 -Variant变量初始化为 Empty -用户自定义变量中的元素都当成个别变量来初始化;变量和常量的声明;变量和常量的作用域;;;数据类型转换;数组和自定义变量;默认地，数组下标从零开始。可使其从其他值开始： 在模块顶部添加 Option Base 语句。例如，语句 Option Base 1 Dim a(10) As Integer 声明的数组有10个元素。下标起始值为