ACCESS实例教程(第8章vba)

1、 access实例教程 access实例教程 access实例教程 p vb语言开发系统是独立运行的开发环境，它创语言开发系统是独立运行的开发环境，它创 建的应用程序可以独立运行在建的应用程序可以独立运行在windows平台上；平台上； p 而而vba则不同，其编程环境和则不同，其编程环境和vba程序都必须程序都必须 依赖依赖office应用程序（如应用程序（如access、word、 excel等）。等）。 access实例教程 access实例教程 access实例教程 access实例教程 access实例教程 工程窗口工程窗口 选择对象选择对象 属性窗口属性窗口 选择对象选择对象 的属

2、性的属性 代码代码 窗口窗口 选择选择 事件事件 access实例教程 access实例教程 access实例教程 access实例教程 编写模块对象的代码在代码窗口进行。编写模块对象的代码在代码窗口进行。 （1 1）窗口顶部有）窗口顶部有2 2个组合框，左边对象框显示所有对象名称，右边个组合框，左边对象框显示所有对象名称，右边 过程框显示当前对象能识别的所有事件名称。选定一个对象，过程框显示当前对象能识别的所有事件名称。选定一个对象， 再选定一个事件，系统会自动生成相应事件过程的起始行与结再选定一个事件，系统会自动生成相应事件过程的起始行与结 束行，只须在两行中间添加过程代码即可。束行，只须

3、在两行中间添加过程代码即可。 “ “通用通用” ” 过程可以被所有控件调用。某控件的过程只在关联事过程可以被所有控件调用。某控件的过程只在关联事 件中有效。件中有效。 （2 2）窗口中央代码区有声明区和过程区，声明区中声明模块使用的）窗口中央代码区有声明区和过程区，声明区中声明模块使用的 变量，过程区显示一个或多个过程，之间用一条灰线分隔。变量，过程区显示一个或多个过程，之间用一条灰线分隔。 （3 3）窗口底部有）窗口底部有2 2个按钮，单击个按钮，单击“过程视图过程视图”按钮，只显示当前过按钮，只显示当前过 程。单击右边程。单击右边“完整的模块视图完整的模块视图”按钮，窗口显示全部过程。按钮

4、，窗口显示全部过程。 access实例教程 1、打开数据库； 2、新创建名称为； 3、在窗体中添加名字为； 4、选择打开属性【单击】打开【代码生成器】； access实例教程 private sub command0_click() end sub docmd为对象用来 调用内置的方法， close关闭窗体 access实例教程 access实例教程 4、保存 5、新创建名称为； 6、在窗体中添加两个文本框 名字为； 8、选择打开属性【单击】打开【代码生成器】； access实例教程 access实例教程 access实例教程 access实例教程 access实例教程 access实例教程

5、access实例教程 access实例教程 access实例教程 access实例教程 access实例教程 access实例教程 access实例教程 access实例教程 vba在数据类型和定义方式上均继承了传统的在数据类型和定义方式上均继承了传统的basic语语 言的特点。言的特点。 access 数据表中的字段使用的数据（数据表中的字段使用的数据（ole对象和备注对象和备注 字段数据类型除外）在字段数据类型除外）在vba中都有对应的类型。中都有对应的类型。 在在vba中，数据类型用来决定变量可以保存何种数据。中，数据类型用来决定变量可以保存何种数据。 vba支持多种数据类型，为用户编程

6、提供了方便。支持多种数据类型，为用户编程提供了方便。 access实例教程 access实例教程 包括：包括：byte、integer、long、single、double和和currency。 (1)byte 以一个字节的无符号二进制数存储，取值范围为以一个字节的无符号二进制数存储，取值范围为0255。 (2)整数整数(integer和和long) 整数是不带小数点和指数符号的数，在机器内以二进制补整数是不带小数点和指数符号的数，在机器内以二进制补 码形式表示。码形式表示。 整型整型(integer) 长整型长整型(long) 例如：例如： 345、-345、345%均表示整型数。均表示整型

7、数。 345&、-345&均表示长整型数。均表示长整型数。 access实例教程 浮点数也称实型数或实数，是带有小数部分的数值。它由浮点数也称实型数或实数，是带有小数部分的数值。它由 三部分组成：符号、指数和尾数。三部分组成：符号、指数和尾数。 单精度型单精度型(single)：以以4个字节存储，符号个字节存储，符号1位，指数位，指数8位，尾位，尾 数数23位。位。用用e来表示指数来表示指数。 双精度型双精度型(double)：以以8个字节存储，符号个字节存储，符号1位，指数位，指数11位，位， 尾数尾数52位。位。用用d来表示指数来表示指数。 例如：例如： 345！、！、-345.12、0.

8、345e+3 均表示单精度浮点数，均表示单精度浮点数， 345#、-345.12#、0.345e+3#、0.345d+3 均表示双精度浮点数。均表示双精度浮点数。 access实例教程 货币数据类型是为表示钱款而设置的。该类型数据以货币数据类型是为表示钱款而设置的。该类型数据以8个个 字节存储，精确到小数点后四位，小数点前有字节存储，精确到小数点后四位，小数点前有15位，小数点位，小数点 后后4位以后的数字将被舍去。位以后的数字将被舍去。 例如例如：345、345.12 均表示货币型数据。均表示货币型数据。 字符串是一个字符序列，由字符串是一个字符序列，由ascii字符组成，包括标准字符组成，

9、包括标准 的的ascii字符和扩展字符和扩展ascii字符及汉字等字符及汉字等 例如：例如： “345”、“access 程序设计程序设计” 等均表示字符型数据。等均表示字符型数据。 表示空字符串，表示空字符串， 表示有一个空格的字符。表示有一个空格的字符。 access实例教程 日期型数据用来表示日期信息，按日期型数据用来表示日期信息，按8字节的浮点数来存储，字节的浮点数来存储， 表示范围：日期范围为表示范围：日期范围为1000年年1月月1日到日到9999年年12月月31日，日， 而时间范围为而时间范围为0:00:0023:59:59。 日期型数据有两种表示方法：日期型数据有两种表示方法：

10、一种是在字面上可被认为日期和时间的字符，表示格式为一种是在字面上可被认为日期和时间的字符，表示格式为 mm/dd/yyyy或或mm-dd-yyyy。 日期文字须以数字符号日期文字须以数字符号 (#)括起来。括起来。 例如例如，#april 1,2002# #10-11-2005# #2005-10-11 10 :30:00 pm#。 access实例教程 access实例教程 ，包括数值、字符串及日期等。，包括数值、字符串及日期等。 p 变体类型数据可以包含变体类型数据可以包含empty、error、nothing和和 null特殊值。特殊值。 p 在使用时，可以使用在使用时，可以使用vart

11、ype与与typename函数来决定函数来决定 如何处理如何处理variant中的数据。中的数据。 p vba规定，如果没有使用规定，如果没有使用dim as 数据类型数据类型显式显式 声明或使用符号来定义变量的数据类型，系统默认为声明或使用符号来定义变量的数据类型，系统默认为 变体类型变体类型(variant)。 access实例教程 p 逻辑数据类型逻辑数据类型(boolean)用于逻辑判断，亦称布尔型。用于逻辑判断，亦称布尔型。 其值为逻辑值，用两个字节存储，它只有其值为逻辑值，用两个字节存储，它只有true(真真)或或 false(假假)两个值。两个值。 p 当当时，时，true转换为

12、转换为-1， false转换为转换为0。 p 当将其他类型数据换成逻辑数据时，当将其他类型数据换成逻辑数据时， 。 对象型数据对象型数据(object)用来表示图形、用来表示图形、ole对象或其他对象，对象或其他对象， 用用4个字节存储，对象变量可引用应用程序中的对象。个字节存储，对象变量可引用应用程序中的对象。 access实例教程 access实例教程 access实例教程 创建自定义的数据类型的语句是创建自定义的数据类型的语句是type，用户自定义类型，用户自定义类型 可包含一个或多个基本数据类型的数据元素、数组或一个先可包含一个或多个基本数据类型的数据元素、数组或一个先 前定义的用户自

13、定义类型。前定义的用户自定义类型。 private | public type 数据类型名数据类型名 1 as 数据类型数据类型 2 as 数据类型数据类型 end type access实例教程 access实例教程 常量是指在程序运行的过程中，其值不能被改变的量。常量是指在程序运行的过程中，其值不能被改变的量。 常量的使用可以增加代码的可读性，并且使代码更加容易常量的使用可以增加代码的可读性，并且使代码更加容易 维护。维护。 在在access 2003中，常量的类型有中，常量的类型有4种：种： 直接常量直接常量 符号常量符号常量 固有常量固有常量 系统定义常量系统定义常量 如：如：10，2

14、0%（整型）整型）， 123.0， 345#（双精度），（双精度）， 345.12 （货币型），（货币型），“ab”，“vba程序设计程序设计”等等 access实例教程 access实例教程 access实例教程 固有常量以两个前缀字母指明了定义该常量的对象库。固有常量以两个前缀字母指明了定义该常量的对象库。 主要用来作为主要用来作为docmd对象的参数。这些内部常量名不能作为对象的参数。这些内部常量名不能作为 用户自定义的变量名或符号常量用户自定义的变量名或符号常量 p 来自来自access库的常量以库的常量以“ac”开头；开头； p 来自来自ado库的常量以库的常量以“ad”开头开头 p

15、 而来自而来自visual basic库的常量则以库的常量则以“vb”开头。开头。 例如：例如： acform、adaddnew、vbcurrency 指指vba系统预先定义好的，用户可以直接引用的量。系统预先定义好的，用户可以直接引用的量。 例如：例如： true、false和和null。 系统定义常量可以在应用程序中使用。系统定义常量可以在应用程序中使用。 access实例教程 p 变量是指在程序运行过程中值会发生变化的数据。变量是指在程序运行过程中值会发生变化的数据。 p 变量的三要素：变量名、变量类型、变量的值。变量的三要素：变量名、变量类型、变量的值。 p 变量的命名规则。变量的命名

16、规则。 p 对变量进行声明可以使用类型说明符号、对变量进行声明可以使用类型说明符号、dim语句和语句和deftype 语句。语句。 由字母、数字、下划线组成，用英文字母开头。由字母、数字、下划线组成，用英文字母开头。 不能包含空格以及除下划线之外的标点符号。不能包含空格以及除下划线之外的标点符号。 不能用不能用vba的关键字（如：的关键字（如：dim）和保留字（如：）和保留字（如：str）。）。 字符个数不得多于字符个数不得多于255个。个。 变量名不区分大小写。变量名不区分大小写。 access实例教程 p 隐式声明在使用一个变量之前并不必先声明这个变量。这隐式声明在使用一个变量之前并不必先

17、声明这个变量。这 个变量只在当前过程中有效，类型为变体数据类型。个变量只在当前过程中有效，类型为变体数据类型。 例如：例如：newvar = 1234。 access实例教程 access实例教程 access实例教程 access实例教程 access实例教程 access实例教程 access实例教程 access实例教程 access实例教程 access实例教程 access实例教程 access实例教程 access实例教程 bage(0)50 bage(1)20 bage(2)70 dim sum as byte sum= bage(0)+ bage(1)+ bage(2) acc

18、ess实例教程 access实例教程 access实例教程 access实例教程 access实例教程 在定义数组时可以不指定下标，而改在程序运行需要时再在定义数组时可以不指定下标，而改在程序运行需要时再 指定，即数组元素的数量是可动态改变的。例如：班级的指定，即数组元素的数量是可动态改变的。例如：班级的 学生数量人数不确定。学生数量人数不确定。 定义一个动态数组的方法：定义一个动态数组的方法： 先用先用 dim 定义数组；定义数组； 例如：例如： dim bages( ) as byte 然后用然后用 redim 声明数组大小；声明数组大小； 例如：例如： redim bages(n-1)

19、在定义常量、变量或数组时，如果未指定变量类型，系统在定义常量、变量或数组时，如果未指定变量类型，系统 默认为默认为variant型数据。型数据。 access实例教程 dim aa() as string redim aa(5) aa(5) = t1 redim preserve aa(9) aa(9) = t2 msgbox aa(5) & & aa(9) redim aa(5, 5) aa(1, 1) = 我现在是二维数组! msgbox aa(1, 1) access实例教程 运行结果： access实例教程 access实例教程 access实例教程 access实例教程 access

20、实例教程 access实例教程 1. 运算符运算符 vba中的运算符可分为中的运算符可分为4种类型：算术运算符、字种类型：算术运算符、字 符串运算符、关系运算符和逻辑运算符。符串运算符、关系运算符和逻辑运算符。 (1) (1) 算术运算符算术运算符 算术运算符是常用的运算符，用来执行简单的算术算术运算符是常用的运算符，用来执行简单的算术 运算，运算，vba提供了提供了8个算术运算符。个算术运算符。 乘幂（乘幂（）、负数（）、负数（-）乘法（）乘法（*）、除法（）、除法（/）、整数除）、整数除 法（法（）、求模（）、求模（mod）、加法（）、加法（+）、减法（）、减法（-）。）。 access实

21、例教程 access实例教程 (2) (2) 关系运算符关系运算符 access实例教程 (2) (2) 关系运算符关系运算符 access实例教程 (3) (3) 逻辑运算符逻辑运算符 access实例教程 (3) (3) 逻辑运算符逻辑运算符 access实例教程 (4) (4) 字符串运算符字符串运算符 字符串运算就是将两个字符串连接起来生成字符串运算就是将两个字符串连接起来生成 一个新的字符串。一个新的字符串。 字符串运算符包括：字符串运算符包括： &运算符运算符 +运算符运算符 access实例教程 将两个不同类型的数据（将两个不同类型的数据（）作字符串连接。）作字符串连接。 例如：

22、例如：1&“+”&2&“等于等于”&1+2 结果为：结果为： “1+2等于等于3” 注意：注意： 由于符号由于符号“&”还是长整型的类型定义符，在字符串变量后使还是长整型的类型定义符，在字符串变量后使 用运算符用运算符“&”时，时，。 运算符运算符“&”两边的操作数可以是字符型，也可以是数值型两边的操作数可以是字符型，也可以是数值型。 不管是字符型还是数值型，进行连接操作前，系统先进行操不管是字符型还是数值型，进行连接操作前，系统先进行操 作数类型转换，数值型转换成字符型，然后再做连接运算。作数类型转换，数值型转换成字符型，然后再做连接运算。 例如：例如：12&56 结果为结果为 “1256”

23、 access实例教程 用来连接两个用来连接两个表达式，形成一个新的字符串。表达式，形成一个新的字符串。 【例例】 “ +”运算符应用示例。运算符应用示例。 “4321”+1234 结果为数值：结果为数值：5555 “4321”+“1234”结果为结果为 43211234 abcd+1234 出错出错 4321+“1234” & 100 结果为结果为 5555100 access实例教程 (5) (5) 对象运算符对象运算符 access实例教程 access实例教程 access实例教程 access实例教程 access实例教程 access实例教程 access实例教程 access实例教程 access实例教程 access实例教程 0只显示确定按钮 1显示确定和取消 2显示放弃、重试和取消 3显示是、否和取消 4显示是、否 5显示重试和取消 access实例教程 access实例教程 access实例教程 access实例教程 access实例教程 access实例教程 access实例教程 access实例教程 access实例教程 access实例教程 access实例教程 access实例教程 access实例教程 access实例教程 access