Access编程语言VBA-精品课件.ppt

1、学习 教程 教材 多媒体课件【友情分享】GOOD GOOD STUDAY,DAY DAY UP 1第9章 Access的编程语言VBAVBA是Visual Basic for Applications的英文缩写，它和Visual Basic极为相似，同样是用Basic语言来作为语法基础的可视化的高级语言。学习 教程 教材 多媒体课件【友情分享】GOOD GOOD STUDAY,DAY DAY UP 29.1 VBA的语法9.2 VBA中的面向对象编程 学习 教程 教材 多媒体课件【友情分享】GOOD GOOD STUDAY,DAY DAY UP 39.1 VBA的语法9.1.1 常量在程序运行

2、过程中，其值不可以发生变化的量叫做常量。1常量的命名规则 常量名必须以字母为首字符，从第二个字符开始可以是数字或字母以及下划线。2常量的类型 变量的类型变量的类型含义含义类型符类型符有效值范围有效值范围Byte字符字符0255Integer短整数短整数%-3276832767Long长整数长整数&-21474836482147483647Single单精实数单精实数！-3.402823E383.402823E38Double双精实数双精实数#-1.7976916486D3081.7976913486D308Sring字符串字符串$Currency货币货币-9223372036859223372

3、03685Boolean布尔值（真布尔值（真/假）假）True（非（非0）和）和False（0）Date日期日期January1100December320199Object对象对象Variant万能万能学习 教程 教材 多媒体课件【友情分享】GOOD GOOD STUDAY,DAY DAY UP 53常量的声明和使用符号常量的定义语句如下：Const 符号常量名=常量值如：Const A=56.5Const B=90在程序中符号常量不能进行二次赋值，这是它与变量不同的地方。学习 教程 教材 多媒体课件【友情分享】GOOD GOOD STUDAY,DAY DAY UP 69.1.2 变量在程序

4、运行的过程中，其值可以发生变化的量叫做变量。1变量的类型变量的类型和常量的类型是一致的。学习 教程 教材 多媒体课件【友情分享】GOOD GOOD STUDAY,DAY DAY UP 72变量的定义（1）使用类型符定义。）使用类型符定义。name$=xiaofengage%=31grade!=100（2）使用）使用Dim语句定义。格式如下：语句定义。格式如下：Dim 变量名 AS 变量类型Dim xing As LongDim r As IntegerDim a As StringDim s As String*4（3）使用）使用DefType语句定义的格式如下：语句定义的格式如下：DefTy

5、pe 字母,字母范围DefInt a,b,c,e-h9.1.3 表达式 表达式是由运算符、函数和数据等内容组合而成的。1运算符和表达式（1）算术运算符运算符运算符运算符含义运算符含义举例举例+加加2+4结果为结果为6减减53结果为结果为2*乘乘6*3结果为结果为18/除除5/4结果为结果为1.25整除整除53结果为结果为1MOD求余求余8MOD3结果为结果为2乘方乘方24结果为结果为16（2）关系运算符 运算符运算符含义含义举例举例大于大于4+36（True）小于小于42大于或等于大于或等于55（True）小于或等于小于或等于39（True）不等于不等于58（True）（3）逻辑运算符 常用的

6、逻辑运算符有“非”运算符（Not）、“与”运算符（And）和“或”运算符（Or）。逻辑运算符之间的运算关系XYX And YX Or YNot XTrueTrueTrueTrueFalseTrueFalseFalseTrueFalseFalseTrueFalseTrueTrueFalseFalseFalseFalseTrue2标准函数由系统提供的函数称为标准函数。常用的标准函数函数函数函数功能函数功能函数说明函数说明Abs(x)求求x的绝对值的绝对值为实数为实数Sin(x)求求x的正弦函数值的正弦函数值为弧度值为弧度值Cos(x)求求x的余弦函数值的余弦函数值为弧度值为弧度值Tan(x)求求x

7、的正切函数值的正切函数值为弧度值为弧度值Fix(x)截取截取x的整数部分的整数部分Fix(3.1)=3Fix(-3.1)=-3Int(x)取不大于取不大于x的最大整数的最大整数Int(3.1)=3Int(-3.1)=-4Log(x)求自然对数求自然对数lnx0Exp(x)求求e的的x次幂次幂2.7182818284590Sgn(x)符号函数符号函数1(x0)SGN(x)=0(x=0)-1(x0)Sor(x)求求x的平方根的平方根x0学习 教程 教材 多媒体课件【友情分享】GOOD GOOD STUDAY,DAY DAY UP 129.1.4 选择结构 1行If语句其语句格式有如下两种：If T

8、hen If Then Else 学习 教程 教材 多媒体课件【友情分享】GOOD GOOD STUDAY,DAY DAY UP 132块If语句 If then Else End If学习 教程 教材 多媒体课件【友情分享】GOOD GOOD STUDAY,DAY DAY UP 143Select Case语句语法格式如下：Select Case Case值1 语句组1 Case值n 语句组n Case Else 语句组 n+1 End Select学习 教程 教材 多媒体课件【友情分享】GOOD GOOD STUDAY,DAY DAY UP 159.1.5 循环结构1For循环结构For=

9、to Step步长 循环体Next 循环变量（1）当步长值为1时，可以省略步长的说明。（2）步长既可以是正数，也可以是负数；既可以是整数，也可以是小数。（3）如果想要提前跳出循环，可以使用Exit For语句。学习 教程 教材 多媒体课件【友情分享】GOOD GOOD STUDAY,DAY DAY UP 162Do循环结构格式1：Do 循环体 Loop格式2：Do While 循环体 Loop格式3：Do Until 循环体 Loop格式4：Do 循环体 Loop While 格式5：Do 循环体 Loop Until 学习 教程 教材 多媒体课件【友情分享】GOOD GOOD STUDAY,

10、DAY DAY UP 179.1.6 数组 数组是指若干个相同类型的元素的集合。在VBA中，按照维数分类，数组可以分为一维数组和多维数组；按照类型分类，数组可以分为整型数组、实型数组和字符串型数组等。（1）对于一维数组，定义格式如下：Dim 数组名(数组下限 To 数组上限)As 数组类型 Dim 数组名类型符号(数组下限 TO 数组上限)学习 教程 教材 多媒体课件【友情分享】GOOD GOOD STUDAY,DAY DAY UP 18（2）对于二维数组，定义格式如下：Dim 数组名(一维下限 To 一维上限,二维下限 To 二维上限)As 数组类型 Dim 数组名类型符号(一维下限 To

11、一维上限,二维下限 To 二维上限)学习 教程 教材 多媒体课件【友情分享】GOOD GOOD STUDAY,DAY DAY UP 199.1.7 子程序和子函数 1Sub子程序子程序Sub子程序的功能是将某些语句集成在一起，用于完成某个特定的功能，Sub子程序也称为过程。子程序的格式如下：Private|Public Static sub 过程名(参数As类型,)语句组 Exit sub 语句组 End Sub 学习 教程 教材 多媒体课件【友情分享】GOOD GOOD STUDAY,DAY DAY UP 202Function函数在VBA中，除了系统提供的函数之外，还可以由用户来自行定义函

12、数。Function函数的定义格式如下：Private|Public Static Function 函数名(参数As类型,)As类型 语句组 函数名=表达式 Exit Function 语句组 End Function学习 教程 教材 多媒体课件【友情分享】GOOD GOOD STUDAY,DAY DAY UP 213Property过程 Property过程主要用来创建和控制自定义属性，如对类模块创建只读属性时，就可以使用Property过程。该过程的定义格式如下：Private|Public Static PropertyGet|Let|Set属性名 参数As类型 语句组 End Pro

13、perty学习 教程 教材 多媒体课件【友情分享】GOOD GOOD STUDAY,DAY DAY UP 229.1.8 文件 为了有效地存取数据，数据必须以某种特定的方式存放，这种特定的方式称为文件结构。按照文件的存取方式和结构来划分，文件可以分为两种类型：顺序文件和随机文件。顺序文件的结构很简单，文件中的记录按照写入文件的顺序一个接一个地存放，但是每条记录的长度是不固定的，因此对顺序文件中的某条记录进行操作时，就需要将整个顺序文件都读入内存，修改完再重新写入磁盘。随机文件也叫做直接文件，在随机文件中，每一条记录的长度是固定的，记录中每个字段的长度也是固定的。学习 教程 教材 多媒体课件【友

14、情分享】GOOD GOOD STUDAY,DAY DAY UP 23打开文件的语句如下：Open文件说明For方式 As 文件号 Len=记录长度关闭文件语句如下：Close 文件号,文件号顺序文件读写语句如下：Input：读入数据。Print：写入数据。Write：写入数据。随机文件读写语句如下：Put：写入数据。Get：读入数据。学习 教程 教材 多媒体课件【友情分享】GOOD GOOD STUDAY,DAY DAY UP 249.2 VBA中的面向对象编程 9.2.1 VBA的开发环境的开发环境VBE9.2.2 事件驱动程序的编写及程序的调试事件驱动程序的编写及程序的调试1事件驱动程序的

15、编写 事件驱动是面向对象编程和面向过程编程之间的一大区别，在视窗操作系统中，用户在操作系统下的各个动作都可以看成是激发了某个事件。事件主要有：鼠标事件、键盘事件、窗口事件、对象事件和操作事件等。学习 教程 教材 多媒体课件【友情分享】GOOD GOOD STUDAY,DAY DAY UP 25键盘事件：（1）KeyPress事件：每敲击一次键盘，激发一次该事件。（2）KeyDown事件：每按下一个键，激发一次该（3）KeyUp事件：每释放一个键，激发一次该事件。键盘事件：（1）Click事件：单击事件。每单击一次鼠标，激发一次该事件。（2）Dblclick事件：双击事件。每双击一次鼠标，激发一

16、次该事件。（3）MouseMove事件：鼠标移动事件。（4）MouseUp事件：鼠标释放事件。（5）MouseDown事件：鼠标按下事件。学习 教程 教材 多媒体课件【友情分享】GOOD GOOD STUDAY,DAY DAY UP 26窗口事件：（1）Open事件：打开事件。（2）Close事件：关闭事件。（3）Active事件：激活事件。（4）Load事件：加载事件。对象事件：（1）GotFocus事件：获得焦点事件。（某一个控件处于获得光标的激活状态，则称其获得焦点。）（2）LostFocus事件：失去焦点事件。（3）BeforeUpdate事件：更新前事件。（4）AfterUpdate

17、事件：更新后事件。（5）Change事件：更改事件。操作事件：（1）Delete事件：删除事件。（2）BeforeInsert事件：插入前事件。（3）AfterInsert事件：插入后事件。学习 教程 教材 多媒体课件【友情分享】GOOD GOOD STUDAY,DAY DAY UP 272程序的调试 程序的调试是开发数据库系统中必不可少的环节，在完成系统程序开发后，需要对其进行调试，以便找到其中的错误。常用的调试手段有设置断点、单步跟踪和设置监视点。学习 教程 教材 多媒体课件【友情分享】GOOD GOOD STUDAY,DAY DAY UP 289.2.3 模块 模块是将VBA声明和过程作

18、为一个单元进行保存的集合。模块有两种基本类型：类模块和标准模块。模块中的每一个过程都可以是一个Function过程或一个Sub过程。1标准模块标准模块包含的是通用过程和常用过程，这些通用过程不与任何对象相关联，常用过程可以在数据库中的任何位置运行。2类模块类模块是可以包含新对象定义的模块。新建一个类实例时，也就新建了一个对象。在Access中，类模块是可以单独存在的。3宏和模块Microsoft Access 能够自动地将宏转换为Visual Basic程序中的事件过程或模块，这些事件过程或模块可以通过Visual Basic执行与宏相同的操作。学习 教程 教材 多媒体课件【友情分享】GOOD

19、 GOOD STUDAY,DAY DAY UP 299.2.4 API函数的调用与ActiveX的编写和应用 1API函数API其实就是一种函数，它们包含在一个扩展名为.DLL的动态链接库文件中。用标准的定义来讲，API就是Windows的32位应用程序编程接口，是一系列很复杂的函数、消息和结构，它使编程人员可以用不同类型的编程语言编写出运行在Windows 9x、Windows NT以及Windows 2000操作系统下的应用程序。学习 教程 教材 多媒体课件【友情分享】GOOD GOOD STUDAY,DAY DAY UP 302ActiveX的编写和应用ActiveX是Microsoft的术语，指的是一组包括控件、DLL、ActiveX文档的组件。ActiveX控件可以由不同的高级语言编写，同时可以应用到不同的高级语言程序中。