《Access 2010 数据库应用技术 教学课件 ppt 作者 朱广华 ACCESS2010 数据库应用技术教程-第9章》由会员分享，可在线阅读，更多相关《Access 2010 数据库应用技术 教学课件 ppt 作者 朱广华 ACCESS2010 数据库应用技术教程-第9章（39页珍藏版）》请在金锄头文库上搜索。
1、ACCESS 2010 数据库应用技术,第9章 模块与VBA,第9章 模块与VBA,9.1 模块与VBA概述 9.2 VBA编程基础 9.3 创建VBA模块与编程环境 9.4 程序的组成与基本结构形式 9.5 程序的调试方法 9.6 数据的导入与导出 9.7 本章小结,9.1 模块与VBA概述,9.1.1 关于模块 1模块的组成 模块主要由VBA声明语句和一个或多个过程组成。 （1）VBA声明语句 声明部分主要包括：Option声明，变量、常量或自定义数据类型的声明。后面章节会进行介绍。 （2）过程 过程是模块的单元组成，是使用VBA编写的程序段的最小单元，用于完成一个相对独立的操作。过程可以
2、包括VBA声明语句和VBA代码。通常将过程分为事件过程和通用过程两大类。,事件过程的定义格式如下： Private Sub 对象名_事件名（） VBA代码 End Sub,事件过程的定义格式如下： PrivatePublicSub 过程名（） VBA 代码 Exit Sub VBA 代码 End Sub,9.1 模块与VBA概述,9.1.1 关于模块 2模块的分类 （1）类模块可以使用事件过程来控制窗体、报表或控件的行为，以及它们对用户操作的响应。当对窗体、报表或控件创建第一个事件过程时，Access将自动创建与之有关的窗体模块和报表模块。窗体模块和报表模块都属于类模块，不会出现在导航窗格的“
3、模块”对象中，而是作为窗体或是报表的属性，依附于窗体或报表。 （2）标准模块是指存放通用过程的模块。标准模块可以在数据库中的任何位置运行。在导航窗格的“模块”对象中可以看到，标准模块中的公共变量或公共过程具有全局特性，其作用范围在整个应用程序里，生命周期是伴随着应用程序的运行而开始、应用程序的关闭而结束。窗体模块和报表模块中的过程可以调用标准模块中已经定义好的过程。,9.1 模块与VBA概述,9.1.2 关于VBA Access中使用的编程语言是VBA，VBA是一种应用程序开发工具，是基于VB发展而来。VB是一种面向对象的程序设计语言，微软公司将其引入Office套件中，用于开发应用程序，并将
4、这种集成在Office程序中的Visual Basic版本称为VBA。 在Access中，使用VBA编写的程序只能保持在Access的数据库文件中，无法脱离Access应用程序的环境独立运行，这是因为VBA程序的运行只能由Office解释运行，不能编译成可执行文件。VB则提供了更多更强大的高级开发工具，可以创建基于Windows 操作系统的程序，还可以为其他程序创建组件。 Access利用Visual Basic编辑器（VBE）来编写过程代码，VBE以微软的Visual Basic编程环境的布局为基础，实际上是一个集编辑、调试、编译等功能于一体的集成开发环境。,9.2 VBA编程基础,9.2.
5、1 语句的语法规则 （1）标识符 标识符是一种标识变量、常量、过程、函数、类等语言构成单位的符号，利用它可以完成对变量、常量、过程、函数、类等的引用。 命名规则 1） 字母打头，由字母、数字和下划线组成，如 A987b_23Abc 2） 字符长度小于40 3） 不能与VB保留字重名，如public, private, dim, goto, next, with, integer, single等 （2）书写规范 1）VBA不区分标识符的字母大小写，一律认为是小写字母； 2）一行可以书写多条语句，各语句之间以冒号 : 分开； 3）一条语句可多行书写，以空格加下划线 _ 来标识下行为续行； 4）标
6、识符最好能简洁明了，不造成歧义。,9.2 VBA编程基础,9.2.1 语句的语法规则 （3）基本语句 1、注释和赋值语句 1）注释语句是用来说明程序中某些语句的功能和作用； 2）赋值语句是进行对变量或对象属性赋值的语句。 2、控制程序流程语句 1) GoTo语句 2) IfThen语句 3) Select Case语句 3、循环语句 1) For Next 循环 2) Do While循环 3) Do Until循环 4) While Wend循环,9.2 VBA编程基础,9.2.2 编程中用到的常量与变量 常量即在程序执行过程中不发生改变的值或字符串。使用Const语句声明常量。 变量在程序
7、执行过程中发生改变的值或字符串，主要作用是为存取数据提供了数据存放信息的容器。 变量命名要注意以下几点： 1、有效性。变量以字母开头，中间可以出现数字和一些标点符号，除下划线( _ )作为连字符外，变量名称不能有空格、加号(+)、减号(-)、逗号(，)、句点(.)等符号。 2、VBA不区分大小写。但在变量命名时，最好体现该变量的作用 3、不能使用VBA中的关键字作为变量。 4、变量名称中不能有特殊类型的声明字符(#、$、%、&或!)。 5、变量名称最多可以包含254个字符。,9.2 VBA编程基础,9.2.2 编程中用到的常量与变量 声明变量 语法为： Dim As 或：Private As
8、或：Public As 可以在一行中声明多个变量，每个变量之间用逗号分隔开。 对象变量 声明对象变量的方法和声明其他类型的变量基本上一样。有三种声明对象变量的方法： Dim myObject As . Dim myObject As New . Dim myObject As Object,9.2 VBA编程基础,9.2.3 函数 函数(function)是能完成特定任务的相关语句和表达式的集合。当函数执行完毕时，它会向调用它的语句返回一个值。如果不显示指定函数的返回值类型，就返回缺省的数据类型值。 声明函数的语法为： Private|Public Static Function (参数) A
9、s 类型 在VBA程序语言中有许多内置函数 测试函数： IsNumeric(x)，IsDate(x) ，IsEmpty(x)，IsError(expression) 数学函数 ：Sin(X)、Cos(X)、Tan(X)、Atan(x) 三字符串函数：Trim(string) ，Ltrim(string) ，Rtrim(string) ，Len(string) 转换函数 ：CBool(expression) ，CByte(expression) ，CDate(expression) 时间函数 ：Now ，Date ，Time,9.2 VBA编程基础,9.2.4 数组 数组是一组拥有相同名称的同类
10、元素。 1、创建数组 用Dim语句来定义固定大小的数组，即声明一个数组。 Dim myArray(9) As Integer Dim语句中不指明数组元素的个数来声明动态数组。 Dim myDynamicArray() As Integer 使用ReDim关键字重新定义数组的大小： ReDim myDynamicArray(10) 2、确定数组的边界 可以使用UBound函数和LBound函数分别获取数组的最大边界和最小边界。,9.2 VBA编程基础,9.2.4 数组 3、多维数组 多维数组可以在每个数组元素中存储一组数据，因此，多维数组的每个数组元素都包含一个数组。 (1)Dim (，) As
11、 (2)Dim ( to ， to ，) As 4、引用数组中的元素 可以使用数组名称和一个索引号来引用数组中的某个特定的元素。,9.2 VBA编程基础,9.2.5 运算符与表达式 （1）连接运算符和表达式 & 连接运算符，用于连接字符串。它能把一些字符串变量连接在一起，形成一个新的字符串。在进行连接运算之前，任何非字符串变量或表达式都转换为字符串。 + 混合连接运算符，它运用很灵活，但会与加法运算符相混，给您的阅读带来不便。例如，结果=表达式1+表达式2，其结果的数据类型取决于表达式的数据类型。 （2）比较运算符和表达式 比较运算符包括(大于)、=(等于)、=(大于或等于)、(不等于)，用于
12、数据元素的比较，其一般的语法为： 结果=表达式1 表达式2 （3）逻辑运算符和表达式 逻辑运算符允许对一个或多个表达式进行运算，并返回一个逻辑值True或False。VBA的逻辑运算符包括：And(逻辑与)、Or(逻辑或)、Not(逻辑非)、Eqv(与或)、Imp(蕴含)、Xor(异或)。 （4）赋值运算符 （5）点运算符,9.2 VBA编程基础,9.2.6 常用的事件 （1）窗体第一次打开时依次触发事件。 打开（Open）：在窗体已经打开，但第一条记录尚未显示时；该事件发生。对于报 表 ，事件发生在报表被预览或被打印之前。 加载（Load）：窗体打开i并且显示其中记录时，该事件发生。 调整大
13、小（Resize）：在窗体打开后，只要窗体大小有变化，该事件发生。 激活（Activate）：该事件在窗体或报表获得焦点并成为活动窗体时发生。 成为当前（Current）：当把焦点移动到一条记录，使之成为成为当前记录时触发。 （2）关闭窗体时依次触发事件。 卸载（Upload）：该事件发生在窗体被关闭之后，从屏幕上删除之前。 停用（Deactivate）：当焦点从窗体或报表移到其他对象时，该事件发生。 关闭（Close）：当窗体或报表被关闭并从屏幕删除时，该事件发生。 （3）插入数据时依次触发的事件。 插入前（BeforeInsert）：在新记录中输入第一个字符时，并且实际创建之前发生。 更新
14、前（BeforeUpdate）：该事件在控件中的数据被改变或记录被更新之后发生。 更新后（AfterUpdate）：该事件在控件中的数据被改变或记录被更新之后发生。 插入后（AfterInsert）：该事件在添加新记录之后发生。,9.2 VBA编程基础,（4）删除数据时依次触发的事件 删除（Delete）：在执行某些操作来删除记录，或按Delete键删除一条记录，并且记录实际被删除之前，该事件发生。 确认删除前（BeforeDelConfirm）：将一条或多条记录删除到缓冲区之后，在系统显示对话框询问用户确认删除操作之前该事件发生。 确认删除后（AfterDelConfirm）：该事件发生在用
15、户确认删除操作，并且记录确认已被删除或者操作已被取消之后发生。 （5）更新数据依次触发事件。 有脏数据时 （Dirty）：当窗体的内容或组合框的文本部分的内容改变时，该事件发生；在选项卡中控件从一页移到另一页时，该事件也发生。 更新前（BeforeUpdate）：在记录的数据被更新之前触发该事件。 更新后（AfterUpdate）：在记录的数据被更新之后触发该事件。,9.2 VBA编程基础,9.2.7 数据类型,9.3 创建VBA模块与编程环境,9.3.1 进入VBE编程环境 方法一：在Access应用程序功能区中，选择【创建】【宏与代码】【模块】或者【类模块】或者【Visual Basic】
16、，打开VBE； 方法二：在Access应用程序功能区中，选择【数据库工具】【宏】【Visual Basic】，打开VBE,9.3 创建VBA模块与编程环境,9.3.2 VBE编程窗口与编辑器 菜单栏 工具栏 工程资源管理器 属性窗口 代码窗口,9.3 创建VBA模块与编程环境,9.3.3 创建新过程,例题：创建一个名为“S_Circle”的过程，先在提示框中输入圆的半径，然后确定是否正数，如果是正数，给出圆的面积。,9.4 程序的组成与基本结构形式,9.4.1 程序设计中语句书写规则 （1）源程序不分大小写，英文字母的大小写是相同的。 （2）通常一条语句写在一行上，但一行最多允许255个字符。当语句较长，一行写不下时，可用续行符“_”将语句连续写在下一行上。 （3）在一行上可以写多条语句，每条语句中间用冒号“:”隔开。 （4）如果一条语句输入完成，按Enter键后该行代码呈红色，说明该行语句有错误，应该及时修改。,9.4 程序的组成与基本结构形式,9.4.2 程序设计中的常用语句 （1）声明语句 Dim
