《第8章VBA编程语言ppt课件.ppt》由会员分享，可在线阅读，更多相关《第8章VBA编程语言ppt课件.ppt（109页珍藏版）》请在taowenge.com淘文阁网|工程机械CAD图纸|机械工程制图|CAD装配图下载|SolidWorks_CaTia_CAD_UG_PROE_设计图分享下载上搜索。
1、ACCESSACCESS数据库应用数据库应用经营者提供商品或者服务有欺诈行为的，应当按照消费者的要求增加赔偿其受到的损失，增加赔偿的金额为消费者购买商品的价款或接受服务的费用经营者提供商品或者服务有欺诈行为的，应当按照消费者的要求增加赔偿其受到的损失，增加赔偿的金额为消费者购买商品的价款或接受服务的费用第8章 VBA编程语言全体编者全体编者Compute Center,Qiqihar University ACCESSACCESS数据库应用数据库应用经营者提供商品或者服务有欺诈行为的，应当按照消费者的要求增加赔偿其受到的损失，增加赔偿的金额为消费者购买商品的价款或接受服务的费用经营者提供商品或
2、者服务有欺诈行为的，应当按照消费者的要求增加赔偿其受到的损失，增加赔偿的金额为消费者购买商品的价款或接受服务的费用本章内容提要：VBA概述概述VBA编程基础编程基础VBA基本控制结构基本控制结构VBA模块模块面向对象程序设计面向对象程序设计ACCESSACCESS数据库应用数据库应用经营者提供商品或者服务有欺诈行为的，应当按照消费者的要求增加赔偿其受到的损失，增加赔偿的金额为消费者购买商品的价款或接受服务的费用经营者提供商品或者服务有欺诈行为的，应当按照消费者的要求增加赔偿其受到的损失，增加赔偿的金额为消费者购买商品的价款或接受服务的费用一、VBA概述1 1、VBAVBA介绍介绍 VBAVBA
3、VBAVBA是（是（是（是（Visual Basic for ApplicationVisual Basic for ApplicationVisual Basic for ApplicationVisual Basic for Application）是）是）是）是Microsoft Microsoft Microsoft Microsoft OfficeOfficeOfficeOffice系列软件的内置编程语言。系列软件的内置编程语言。系列软件的内置编程语言。系列软件的内置编程语言。BasicBasic语言语言语言语言VisualVisual可视化的程序设计可视化的程序设计可视化的程序设计
4、可视化的程序设计2 2、与宏的比较、与宏的比较在在在在AccessAccessAccessAccess中，中，中，中，VBAVBAVBAVBA与宏的作用类似，只是宏由系统给与宏的作用类似，只是宏由系统给与宏的作用类似，只是宏由系统给与宏的作用类似，只是宏由系统给定，而定，而定，而定，而VBAVBAVBAVBA是需要用户自己编写程序。但在完成下是需要用户自己编写程序。但在完成下是需要用户自己编写程序。但在完成下是需要用户自己编写程序。但在完成下列操作时，必须使用列操作时，必须使用列操作时，必须使用列操作时，必须使用VBAVBAVBAVBA。数据库的移植数据库的移植数据库的移植数据库的移植建立用户
5、自定义函数建立用户自定义函数建立用户自定义函数建立用户自定义函数ACCESSACCESS数据库应用数据库应用经营者提供商品或者服务有欺诈行为的，应当按照消费者的要求增加赔偿其受到的损失，增加赔偿的金额为消费者购买商品的价款或接受服务的费用经营者提供商品或者服务有欺诈行为的，应当按照消费者的要求增加赔偿其受到的损失，增加赔偿的金额为消费者购买商品的价款或接受服务的费用3.VBA编程环境VBE（Visual Basic Editor）打开打开VBE窗口的方法：窗口的方法：独立程序模块独立程序模块独立程序模块独立程序模块“数据库数据库数据库数据库”窗口窗口窗口窗口“模块模块模块模块”对象选项对象选项
6、对象选项对象选项“新建新建新建新建”按钮按钮按钮按钮 菜单栏菜单栏菜单栏菜单栏“工具工具工具工具”“宏宏宏宏”“Visual Basic“Visual Basic编辑器编辑器编辑器编辑器”命令项命令项命令项命令项绑定型程序模块绑定型程序模块绑定型程序模块绑定型程序模块VBE窗口的组成窗口的组成标准工具栏、工程窗口、属性窗口标准工具栏、工程窗口、属性窗口标准工具栏、工程窗口、属性窗口标准工具栏、工程窗口、属性窗口代码窗口代码窗口代码窗口代码窗口操作演示ACCESSACCESS数据库应用数据库应用经营者提供商品或者服务有欺诈行为的，应当按照消费者的要求增加赔偿其受到的损失，增加赔偿的金额为消费者购
7、买商品的价款或接受服务的费用经营者提供商品或者服务有欺诈行为的，应当按照消费者的要求增加赔偿其受到的损失，增加赔偿的金额为消费者购买商品的价款或接受服务的费用 3.VBA编程环境设计人员可以在代码窗设计人员可以在代码窗口中进行代码编写、修口中进行代码编写、修改与调试等处理。改与调试等处理。“视图视图”菜单：菜单：对象浏览器对象浏览器对象浏览器对象浏览器立即窗口立即窗口立即窗口立即窗口本地窗口本地窗口本地窗口本地窗口监视窗口监视窗口监视窗口监视窗口在标准模块中调试程序在标准模块中调试程序示例示例ACCESSACCESS数据库应用数据库应用经营者提供商品或者服务有欺诈行为的，应当按照消费者的要求增
8、加赔偿其受到的损失，增加赔偿的金额为消费者购买商品的价款或接受服务的费用经营者提供商品或者服务有欺诈行为的，应当按照消费者的要求增加赔偿其受到的损失，增加赔偿的金额为消费者购买商品的价款或接受服务的费用二、VBA编程基础数据类型数据类型常量和变量常量和变量 运算符与表达式运算符与表达式 常用内置函数的使用方法常用内置函数的使用方法数组数组ACCESSACCESS数据库应用数据库应用经营者提供商品或者服务有欺诈行为的，应当按照消费者的要求增加赔偿其受到的损失，增加赔偿的金额为消费者购买商品的价款或接受服务的费用经营者提供商品或者服务有欺诈行为的，应当按照消费者的要求增加赔偿其受到的损失，增加赔偿
9、的金额为消费者购买商品的价款或接受服务的费用1.数据类型VBAVBA提供的基本数据类型主要有提供的基本数据类型主要有字符串型字符串型数据数据和和数值型数值型数据，此外还提供了货币、对象、数据，此外还提供了货币、对象、变体等数据类型。变体等数据类型。VBAVBA共有共有1212种数据类型种数据类型。此。此外用户还可以根据以下类型用外用户还可以根据以下类型用TypeType自定义数自定义数据类型。据类型。有效使用数据类型，应该尽量明确变量的具有效使用数据类型，应该尽量明确变量的具体数据类型。如：体数据类型。如：Dim X As IntegerDim X As IntegerACCESSACCESS
10、数据库应用数据库应用经营者提供商品或者服务有欺诈行为的，应当按照消费者的要求增加赔偿其受到的损失，增加赔偿的金额为消费者购买商品的价款或接受服务的费用经营者提供商品或者服务有欺诈行为的，应当按照消费者的要求增加赔偿其受到的损失，增加赔偿的金额为消费者购买商品的价款或接受服务的费用VBA基本数据类型基本数据类型 数据类型说明数据类型说明数据类型数据类型类型标识符类型标识符占用字节占用字节字符串型字符串型字符串型字符串型String String String String$字符长度字符长度字符长度字符长度(0-65400)(0-65400)(0-65400)(0-65400)字节型字节型字节型字
11、节型ByteByteByteByte无无无无1 1 1 1布尔型布尔型布尔型布尔型BooleanBooleanBooleanBoolean无无无无2 2 2 2整数型整数型整数型整数型IntegerIntegerIntegerInteger%2 2 2 2长整数型长整数型长整数型长整数型LongLongLongLong&4 4 4 4单精度型单精度型单精度型单精度型SingleSingleSingleSingle!4 4 4 4双精度型双精度型双精度型双精度型DoubleDoubleDoubleDouble#8 8 8 8小数点型小数点型小数点型小数点型DecimalDecimalDecima
12、lDecimal无无无无14141414日期型日期型日期型日期型DateDateDateDate无无无无8 8 8 8货币型货币型货币型货币型CurrencyCurrencyCurrencyCurrency 8 8 8 8变体型变体型变体型变体型VariantVariantVariantVariant无无无无以上任意类型，可变以上任意类型，可变以上任意类型，可变以上任意类型，可变对象型对象型对象型对象型ObjectObjectObjectObject无无无无4 4 4 4自定义类型自定义类型自定义类型自定义类型TypeEnd TypeTypeEnd Type无无无无由定义内容决定由定义内容决定
13、由定义内容决定由定义内容决定ACCESSACCESS数据库应用数据库应用经营者提供商品或者服务有欺诈行为的，应当按照消费者的要求增加赔偿其受到的损失，增加赔偿的金额为消费者购买商品的价款或接受服务的费用经营者提供商品或者服务有欺诈行为的，应当按照消费者的要求增加赔偿其受到的损失，增加赔偿的金额为消费者购买商品的价款或接受服务的费用2.常量和变量 常量：在程序运行过程中保持不变的量。常量：在程序运行过程中保持不变的量。常量的种类：常量的种类：直接直接直接直接常量常量常量常量，如：，如：，如：，如：344344、3 3.14159.14159、-23-23等；等；等；等；符号常量，如：符号常量，如
14、：符号常量，如：符号常量，如：const pi=3.14const pi=3.14；固有常量，如：固有常量，如：固有常量，如：固有常量，如：acFormacForm、adAddNewadAddNew、vbCuruencyvbCuruency等；等；等；等；系统定义常量，如系统定义常量，如系统定义常量，如系统定义常量，如TrueTrue、FalseFalse、NullNull等。等。等。等。常量的数据类型参考常量的数据类型参考-VBAVBA基本数据类型基本数据类型 符号常量的声明和使用：符号常量的声明和使用：const const 符号常量名符号常量名符号常量名符号常量名=常数常数常数常数ACC
15、ESSACCESS数据库应用数据库应用经营者提供商品或者服务有欺诈行为的，应当按照消费者的要求增加赔偿其受到的损失，增加赔偿的金额为消费者购买商品的价款或接受服务的费用经营者提供商品或者服务有欺诈行为的，应当按照消费者的要求增加赔偿其受到的损失，增加赔偿的金额为消费者购买商品的价款或接受服务的费用2.常量和变量变量：程序运行过程中，值可以改变的量。变量：程序运行过程中，值可以改变的量。变量的类型参考变量的类型参考-VBAVBA基本数据类型。基本数据类型。变量的定义：变量的定义：使用类型符定义，如：使用类型符定义，如：使用类型符定义，如：使用类型符定义，如：BookNumber%=1234 Bo
16、okNumber%=1234 【例例例例8.68.6】使用使用使用使用DimDim语句定义，如：语句定义，如：语句定义，如：语句定义，如：Dim I As integer Dim I As integer 【例例例例8.78.7】使用使用使用使用DefTypeDefType语句，如：语句，如：语句，如：语句，如：DefInt a,b,c,e-h DefInt a,b,c,e-h 【例例例例8.88.8】变量的命名同标识符的命名变量的命名同标识符的命名思考思考：变量与常量的区别？变量与常量的区别？Sub ConstSample()Const PI As Single=3.1415926 PI=3
17、.14 错误，PI的值不能改变 r%=5 S!=PI*r2End SubACCESSACCESS数据库应用数据库应用经营者提供商品或者服务有欺诈行为的，应当按照消费者的要求增加赔偿其受到的损失，增加赔偿的金额为消费者购买商品的价款或接受服务的费用经营者提供商品或者服务有欺诈行为的，应当按照消费者的要求增加赔偿其受到的损失，增加赔偿的金额为消费者购买商品的价款或接受服务的费用3.运算符与表达式VBAVBA中基本的运算符有五种：算术运算符、中基本的运算符有五种：算术运算符、关系运算符、逻辑运算符、字符串运算符、关系运算符、逻辑运算符、字符串运算符、对象运算符。对象运算符。表达式是由运算符、函数和数
18、据等内容组合表达式是由运算符、函数和数据等内容组合而成。而成。根据运算符的不同，可以将表达式分成以下根据运算符的不同，可以将表达式分成以下几类：算术表达式、关系表达式、逻辑表达几类：算术表达式、关系表达式、逻辑表达式、字符串表达式和对象表达式。式、字符串表达式和对象表达式。ACCESSACCESS数据库应用数据库应用经营者提供商品或者服务有欺诈行为的，应当按照消费者的要求增加赔偿其受到的损失，增加赔偿的金额为消费者购买商品的价款或接受服务的费用经营者提供商品或者服务有欺诈行为的，应当按照消费者的要求增加赔偿其受到的损失，增加赔偿的金额为消费者购买商品的价款或接受服务的费用算术运算符与表达式算术
19、运算符算术运算符算术运算符算术运算符+加、加、加、加、-减减减减 、*乘乘乘乘 、/除除除除 整除、整除、整除、整除、MODMOD求余求余求余求余 、乘方乘方乘方乘方例如：例如：例如：例如：3+53+5、5-45-4、5*45*4、4/64/6 43=143=1、7 MOD 4=3 7 MOD 4=3 、23=823=8运算符的优先级：运算符的优先级：运算符的优先级：运算符的优先级：括号括号括号括号 取负取负取负取负 乘方乘方乘方乘方 */MODMODMODMOD +-算术表达式算术表达式算术表达式算术表达式-4+3*6 MOD 5(24)-4+3*6 MOD 5(24)ACCESSACCES
20、S数据库应用数据库应用经营者提供商品或者服务有欺诈行为的，应当按照消费者的要求增加赔偿其受到的损失，增加赔偿的金额为消费者购买商品的价款或接受服务的费用经营者提供商品或者服务有欺诈行为的，应当按照消费者的要求增加赔偿其受到的损失，增加赔偿的金额为消费者购买商品的价款或接受服务的费用关系运算符和表达式关系运算符：关系运算符：大于、大于、大于、大于、小于、小于、小于、小于、=等于、等于、等于、等于、不等于不等于不等于不等于=大于等于、大于等于、大于等于、大于等于、=6 4+36 （true true 或或或或 1 1）4-20 4-2AndOrNotAndOr逻辑运算的运算规则是：逻辑运算的运算规
21、则是：ACCESSACCESS数据库应用数据库应用经营者提供商品或者服务有欺诈行为的，应当按照消费者的要求增加赔偿其受到的损失，增加赔偿的金额为消费者购买商品的价款或接受服务的费用经营者提供商品或者服务有欺诈行为的，应当按照消费者的要求增加赔偿其受到的损失，增加赔偿的金额为消费者购买商品的价款或接受服务的费用逻辑运算的运算规则例如：例如：2+34 And 622+34 And 622-492-49Not 4+510Not 4+510AndTrue falseTrue falseTrue falseFalse falseOrTrue falseTrue falseTrue TrueTrue fa
22、lseNotTrue falseFalse TrueACCESSACCESS数据库应用数据库应用经营者提供商品或者服务有欺诈行为的，应当按照消费者的要求增加赔偿其受到的损失，增加赔偿的金额为消费者购买商品的价款或接受服务的费用经营者提供商品或者服务有欺诈行为的，应当按照消费者的要求增加赔偿其受到的损失，增加赔偿的金额为消费者购买商品的价款或接受服务的费用字符连接符与表达式字符连接符：字符连接符：+：连接字符串：连接字符串：连接字符串：连接字符串&：可以将不同类型变量连接成字符串：可以将不同类型变量连接成字符串：可以将不同类型变量连接成字符串：可以将不同类型变量连接成字符串 例如：例如：a$=a
23、$=“123123”：b$=b$=“abcabc”c$=a$+b$(c$=a$+b$(或或或或c$=a$&b$)c$=a$&b$)则则则则C$C$的值为的值为的值为的值为“123abc123abc”思考：思考：C&1C&1和和C+1C+1是否正确？是否正确？ACCESSACCESS数据库应用数据库应用经营者提供商品或者服务有欺诈行为的，应当按照消费者的要求增加赔偿其受到的损失，增加赔偿的金额为消费者购买商品的价款或接受服务的费用经营者提供商品或者服务有欺诈行为的，应当按照消费者的要求增加赔偿其受到的损失，增加赔偿的金额为消费者购买商品的价款或接受服务的费用对象运算符与表达式对象运算符：对象运算
24、符：!对象引用符对象引用符对象引用符对象引用符.对象属性引用符对象属性引用符对象属性引用符对象属性引用符例如：例如：Forms!Forms!学生成绩单学生成绩单学生成绩单学生成绩单 打开学生成绩单窗体打开学生成绩单窗体打开学生成绩单窗体打开学生成绩单窗体Command1.CaptionCommand1.Caption 引用命令按钮引用命令按钮引用命令按钮引用命令按钮Command1Command1的的的的CaptionCaption属性属性属性属性ACCESSACCESS数据库应用数据库应用经营者提供商品或者服务有欺诈行为的，应当按照消费者的要求增加赔偿其受到的损失，增加赔偿的金额为消费者购买
25、商品的价款或接受服务的费用经营者提供商品或者服务有欺诈行为的，应当按照消费者的要求增加赔偿其受到的损失，增加赔偿的金额为消费者购买商品的价款或接受服务的费用例：表达式书写规则其其VBAVBA表达式为：表达式为：(-b+Sqr(b2-4*a*c)/(2*a)(-b+Sqr(b2-4*a*c)/(2*a)书写规则说明：书写规则说明：括号要匹配括号要匹配括号要匹配括号要匹配乘号不能省略乘号不能省略乘号不能省略乘号不能省略表达式从左到右书写表达式从左到右书写表达式从左到右书写表达式从左到右书写 使用表达式生成器创建表达式使用表达式生成器创建表达式 操作演示ACCESSACCESS数据库应用数据库应用经
26、营者提供商品或者服务有欺诈行为的，应当按照消费者的要求增加赔偿其受到的损失，增加赔偿的金额为消费者购买商品的价款或接受服务的费用经营者提供商品或者服务有欺诈行为的，应当按照消费者的要求增加赔偿其受到的损失，增加赔偿的金额为消费者购买商品的价款或接受服务的费用如何使用表达式 表达式及其说明 表达式表达式表达式表达式说明说明说明说明=数学成绩数学成绩数学成绩数学成绩+英语成绩英语成绩英语成绩英语成绩 计算报表上两个文本框控件中的值之计算报表上两个文本框控件中的值之计算报表上两个文本框控件中的值之计算报表上两个文本框控件中的值之和和和和Date()Date()将表中字段的默认值设置为当前日期将表中字
27、段的默认值设置为当前日期将表中字段的默认值设置为当前日期将表中字段的默认值设置为当前日期总价总价总价总价:订单订单订单订单.单价单价单价单价*数量数量数量数量 创建查询中的计算字段创建查询中的计算字段创建查询中的计算字段创建查询中的计算字段Between#1/1/2005#And Between#1/1/2005#And#12/31/2005#12/31/2005#用于输入查询中用于输入查询中用于输入查询中用于输入查询中“日期日期日期日期/时间时间时间时间”字段字段字段字段的条件的条件的条件的条件=订单订单订单订单!小计小计小计小计返回返回返回返回“订单订单订单订单”窗体的窗体的窗体的窗体的“
28、小计小计小计小计”控件的控件的控件的控件的值值值值 0 0设置表中数值字段的有效性规则设置表中数值字段的有效性规则设置表中数值字段的有效性规则设置表中数值字段的有效性规则ACCESSACCESS数据库应用数据库应用经营者提供商品或者服务有欺诈行为的，应当按照消费者的要求增加赔偿其受到的损失，增加赔偿的金额为消费者购买商品的价款或接受服务的费用经营者提供商品或者服务有欺诈行为的，应当按照消费者的要求增加赔偿其受到的损失，增加赔偿的金额为消费者购买商品的价款或接受服务的费用4.常用内置函数的使用方法 内置函数的调用格式：函数名内置函数的调用格式：函数名(参数参数)例如：求例如：求例如：求例如：求S
29、in(30)Sin(30)VBAVBA表达式为：表达式为：表达式为：表达式为：Sin(3.14*30/180)Sin(3.14*30/180)根据函数返回值的类型，可以将函数分为：根据函数返回值的类型，可以将函数分为：数值型函数数值型函数数值型函数数值型函数字符串函数字符串函数字符串函数字符串函数日期日期日期日期/时间函数时间函数时间函数时间函数类型转换函数类型转换函数类型转换函数类型转换函数ACCESSACCESS数据库应用数据库应用经营者提供商品或者服务有欺诈行为的，应当按照消费者的要求增加赔偿其受到的损失，增加赔偿的金额为消费者购买商品的价款或接受服务的费用经营者提供商品或者服务有欺诈行
30、为的，应当按照消费者的要求增加赔偿其受到的损失，增加赔偿的金额为消费者购买商品的价款或接受服务的费用5.数组数组是由一组具有相同数据类型的变量构成数组是由一组具有相同数据类型的变量构成的集合。的集合。数组定义格式为：数组定义格式为：Dim Dim 数组名数组名数组名数组名(下标下界下标下界下标下界下标下界 to to 下标上界限下标上界限下标上界限下标上界限，下标下界下标下界下标下界下标下界 to to 下标上界限下标上界限下标上界限下标上界限)As )As 数据类型数据类型数据类型数据类型例如例如【例例例例8.98.9】Dim A(3)as IntegerDim A(3)as Integer
31、Dim B(3,3)as IntegerDim B(3,3)as Integer注意：注意：Option Base n 的作用的作用A(0)A(1)A(2)0 1 20 1 201 2B(0,1)ACCESSACCESS数据库应用数据库应用经营者提供商品或者服务有欺诈行为的，应当按照消费者的要求增加赔偿其受到的损失，增加赔偿的金额为消费者购买商品的价款或接受服务的费用经营者提供商品或者服务有欺诈行为的，应当按照消费者的要求增加赔偿其受到的损失，增加赔偿的金额为消费者购买商品的价款或接受服务的费用数组的类型按数组元素个数是否可变分为：按数组元素个数是否可变分为：固定数组固定数组固定数组固定数组动
32、态数组动态数组动态数组动态数组动态数组的定义方法：动态数组的定义方法：先使用先使用先使用先使用DimDim来声明数组来声明数组来声明数组来声明数组再用再用再用再用ReDimReDim来指定数组元素个数来指定数组元素个数来指定数组元素个数来指定数组元素个数加保留字加保留字加保留字加保留字PreservePreserve 来保留以前的值来保留以前的值来保留以前的值来保留以前的值否则，使用否则，使用否则，使用否则，使用ReDimReDim后，数组元素的值会被重新初始化为默后，数组元素的值会被重新初始化为默后，数组元素的值会被重新初始化为默后，数组元素的值会被重新初始化为默认值。认值。认值。认值。AC
33、CESSACCESS数据库应用数据库应用经营者提供商品或者服务有欺诈行为的，应当按照消费者的要求增加赔偿其受到的损失，增加赔偿的金额为消费者购买商品的价款或接受服务的费用经营者提供商品或者服务有欺诈行为的，应当按照消费者的要求增加赔偿其受到的损失，增加赔偿的金额为消费者购买商品的价款或接受服务的费用数组的使用数组的赋值数组的赋值例：定义动态数组，并求各元素的和。例：定义动态数组，并求各元素的和。Private sub SumArray()Private sub SumArray()Private sub SumArray()Private sub SumArray()Dim S,A()as i
34、nteger Dim S,A()as integer Dim S,A()as integer Dim S,A()as integer Redim A(2)Redim A(2)Redim A(2)Redim A(2)A(0)=1:A(1)=2 A(0)=1:A(1)=2 A(0)=1:A(1)=2 A(0)=1:A(1)=2 Redim preserve A(3)Redim preserve A(3)Redim preserve A(3)Redim preserve A(3)A(2)=3 A(2)=3 A(2)=3 A(2)=3 S=A(0)+A(1)+A(2)S=A(0)+A(1)+A(2)S
35、=A(0)+A(1)+A(2)S=A(0)+A(1)+A(2)End SubEnd SubEnd SubEnd Sub如果去掉如果去掉preservepreserve关键词结果会如何关键词结果会如何ACCESSACCESS数据库应用数据库应用经营者提供商品或者服务有欺诈行为的，应当按照消费者的要求增加赔偿其受到的损失，增加赔偿的金额为消费者购买商品的价款或接受服务的费用经营者提供商品或者服务有欺诈行为的，应当按照消费者的要求增加赔偿其受到的损失，增加赔偿的金额为消费者购买商品的价款或接受服务的费用小结本部分主要介绍了本部分主要介绍了VBA及其编程环境、及其编程环境、VBA的基本数据类型、常量和
36、变量、运算符与表的基本数据类型、常量和变量、运算符与表达式达式、常用内置函数的使用方法和数组的基、常用内置函数的使用方法和数组的基本概念。本概念。其中，重点内容是其中，重点内容是VBA的基本数据类型和运的基本数据类型和运算符与表达式算符与表达式；难点内容是常用内置函数的；难点内容是常用内置函数的使用方法和数组的基本概念。使用方法和数组的基本概念。ACCESSACCESS数据库应用数据库应用经营者提供商品或者服务有欺诈行为的，应当按照消费者的要求增加赔偿其受到的损失，增加赔偿的金额为消费者购买商品的价款或接受服务的费用经营者提供商品或者服务有欺诈行为的，应当按照消费者的要求增加赔偿其受到的损失，
37、增加赔偿的金额为消费者购买商品的价款或接受服务的费用课堂练习课堂练习课堂练习1 1、VBEVBE窗口的基本组成及其打开方法？窗口的基本组成及其打开方法？窗口的基本组成及其打开方法？窗口的基本组成及其打开方法？2 2、常量与变量的区别？、常量与变量的区别？、常量与变量的区别？、常量与变量的区别？3 3、利用、利用、利用、利用VBAVBA语法书写表达式？语法书写表达式？语法书写表达式？语法书写表达式？ACCESSACCESS数据库应用数据库应用经营者提供商品或者服务有欺诈行为的，应当按照消费者的要求增加赔偿其受到的损失，增加赔偿的金额为消费者购买商品的价款或接受服务的费用经营者提供商品或者服务有欺
38、诈行为的，应当按照消费者的要求增加赔偿其受到的损失，增加赔偿的金额为消费者购买商品的价款或接受服务的费用三、VBA基本控制结构程序语句程序语句程序语句的书写格式程序语句的书写格式程序的基本语句程序的基本语句VBAVBA程序的基本控制结构有三种：程序的基本控制结构有三种：顺序结构顺序结构选择结构选择结构循环结构循环结构ACCESSACCESS数据库应用数据库应用经营者提供商品或者服务有欺诈行为的，应当按照消费者的要求增加赔偿其受到的损失，增加赔偿的金额为消费者购买商品的价款或接受服务的费用经营者提供商品或者服务有欺诈行为的，应当按照消费者的要求增加赔偿其受到的损失，增加赔偿的金额为消费者购买商品
39、的价款或接受服务的费用1.程序语句的书写格式 VBAVBA程序语句有自己的书写格式，主要规定如下：程序语句有自己的书写格式，主要规定如下：程序语句有自己的书写格式，主要规定如下：程序语句有自己的书写格式，主要规定如下：不区分字母的大小写。不区分字母的大小写。不区分字母的大小写。不区分字母的大小写。在书写标点符号和括号时，要用西文格式。在书写标点符号和括号时，要用西文格式。在书写标点符号和括号时，要用西文格式。在书写标点符号和括号时，要用西文格式。在语句中的关键字的首字母均转换成大写，其余字母转换在语句中的关键字的首字母均转换成大写，其余字母转换在语句中的关键字的首字母均转换成大写，其余字母转换
40、在语句中的关键字的首字母均转换成大写，其余字母转换成小写。成小写。成小写。成小写。自定义的变量和过程名，以第一次定义的格式为准。自定义的变量和过程名，以第一次定义的格式为准。自定义的变量和过程名，以第一次定义的格式为准。自定义的变量和过程名，以第一次定义的格式为准。续行的行尾加上续行符（空格续行的行尾加上续行符（空格续行的行尾加上续行符（空格续行的行尾加上续行符（空格+下划线下划线下划线下划线“_”_”_”_”）。）。）。）。在一行上写多条语句，语句间用冒号在一行上写多条语句，语句间用冒号在一行上写多条语句，语句间用冒号在一行上写多条语句，语句间用冒号“:”:”:”:”分隔。分隔。分隔。分隔。
41、输入一行语句并按输入一行语句并按输入一行语句并按输入一行语句并按EnterEnterEnterEnter键，键，键，键，VBAVBAVBAVBA会自动进行语法检查，如会自动进行语法检查，如会自动进行语法检查，如会自动进行语法检查，如果语句存在错误，该行代码以红色提示（或伴有错误信息果语句存在错误，该行代码以红色提示（或伴有错误信息果语句存在错误，该行代码以红色提示（或伴有错误信息果语句存在错误，该行代码以红色提示（或伴有错误信息提示）。提示）。提示）。提示）。ACCESSACCESS数据库应用数据库应用经营者提供商品或者服务有欺诈行为的，应当按照消费者的要求增加赔偿其受到的损失，增加赔偿的金额
42、为消费者购买商品的价款或接受服务的费用经营者提供商品或者服务有欺诈行为的，应当按照消费者的要求增加赔偿其受到的损失，增加赔偿的金额为消费者购买商品的价款或接受服务的费用2.程序的基本语句 程序的功能是靠执行语句来实现的程序的功能是靠执行语句来实现的VBA中的几个常用的基本语句中的几个常用的基本语句注释语句注释语句注释语句注释语句 声明语句声明语句声明语句声明语句 OptionOption语句语句语句语句 赋值语句赋值语句赋值语句赋值语句 WithWith语句语句语句语句 On ErrorOn Error语句语句语句语句 ACCESSACCESS数据库应用数据库应用经营者提供商品或者服务有欺诈行
43、为的，应当按照消费者的要求增加赔偿其受到的损失，增加赔偿的金额为消费者购买商品的价款或接受服务的费用经营者提供商品或者服务有欺诈行为的，应当按照消费者的要求增加赔偿其受到的损失，增加赔偿的金额为消费者购买商品的价款或接受服务的费用注释语句注释语句、声明语句和option语句注释语句注释语句 使用使用使用使用RemRem语句或用单引号语句或用单引号语句或用单引号语句或用单引号“”实现实现实现实现声明语句声明语句声明语句用于命名和定义过程、变量、数组或常量声明语句用于命名和定义过程、变量、数组或常量声明语句用于命名和定义过程、变量、数组或常量声明语句用于命名和定义过程、变量、数组或常量例如，例如，
44、例如，例如，dim a as integerdim a as integeroption语句语句OptionOption语句在模块的开始部分使用，用于对环境状态进行语句在模块的开始部分使用，用于对环境状态进行语句在模块的开始部分使用，用于对环境状态进行语句在模块的开始部分使用，用于对环境状态进行设置。设置。设置。设置。Option ExplicitOption ExplicitOption Base 0|1Option Base 0|1例如：例如：Str1=图书馆借阅管理系统图书馆借阅管理系统 Str1变量记下图书馆借阅管理系统的名称变量记下图书馆借阅管理系统的名称Str2=Access数据库
45、基础教程数据库基础教程 Rem Str2变量记下变量记下Access数据库基础教程数据库基础教程字符串字符串ACCESSACCESS数据库应用数据库应用经营者提供商品或者服务有欺诈行为的，应当按照消费者的要求增加赔偿其受到的损失，增加赔偿的金额为消费者购买商品的价款或接受服务的费用经营者提供商品或者服务有欺诈行为的，应当按照消费者的要求增加赔偿其受到的损失，增加赔偿的金额为消费者购买商品的价款或接受服务的费用赋值语句赋值语句 功能：给变量或常量指定一个值或表达式。功能：给变量或常量指定一个值或表达式。格式：格式：let let 变量名变量名变量名变量名=表达式表达式表达式表达式 对象名对象名对
46、象名对象名.属性名属性名属性名属性名=表达式（若对象名省略，则默认对象为表达式（若对象名省略，则默认对象为表达式（若对象名省略，则默认对象为表达式（若对象名省略，则默认对象为当前窗体或报表）当前窗体或报表）当前窗体或报表）当前窗体或报表）【例例8.15】赋值语句举例赋值语句举例Sub program_clause()BookName=Access数据库基础教程 BookPrice=23.40 Let BookNumber=1200 BookTotalPrice=BookNumber*BookPrice Form1.Caption=图书馆借阅管理系统 Text1.text=Text2.textE
47、nd SubACCESSACCESS数据库应用数据库应用经营者提供商品或者服务有欺诈行为的，应当按照消费者的要求增加赔偿其受到的损失，增加赔偿的金额为消费者购买商品的价款或接受服务的费用经营者提供商品或者服务有欺诈行为的，应当按照消费者的要求增加赔偿其受到的损失，增加赔偿的金额为消费者购买商品的价款或接受服务的费用With语句With语句对象执行一系列的语句，而不用重复指出对象的名称。对象执行一系列的语句，而不用重复指出对象的名称。对象执行一系列的语句，而不用重复指出对象的名称。对象执行一系列的语句，而不用重复指出对象的名称。格式：格式：格式：格式：With With 对象对象对象对象.语句语
48、句语句语句 End WithEnd With【例例例例8.168.16】改变改变改变改变Command1Command1按钮的属性。按钮的属性。按钮的属性。按钮的属性。Sub program2()With Command1.Caption=确定.Top=500.Enabled=True.FontSize=14 End WithEnd SubACCESSACCESS数据库应用数据库应用经营者提供商品或者服务有欺诈行为的，应当按照消费者的要求增加赔偿其受到的损失，增加赔偿的金额为消费者购买商品的价款或接受服务的费用经营者提供商品或者服务有欺诈行为的，应当按照消费者的要求增加赔偿其受到的损失，增加赔
49、偿的金额为消费者购买商品的价款或接受服务的费用On Error语句语句常见的错误主要发生在以下常见的错误主要发生在以下3个方面：个方面：语法错误语法错误语法错误语法错误运行错误运行错误运行错误运行错误逻辑错误逻辑错误逻辑错误逻辑错误构造错误陷阱的常用语句：构造错误陷阱的常用语句：On Error GoToOn Error GoTo On Error GoTo On Error GoTo 标号标号标号标号 On Error Resume NextOn Error Resume Next On Error GoTo 0On Error GoTo 0ErrErr对象对象对象对象Error()Erro
50、r()函数和函数和函数和函数和ErrorError语句语句语句语句【例8.17】错误捕捉与处理举例。Private Sub Myproc()On Error GoTo ErrlabelErrlabel：End SubACCESSACCESS数据库应用数据库应用经营者提供商品或者服务有欺诈行为的，应当按照消费者的要求增加赔偿其受到的损失，增加赔偿的金额为消费者购买商品的价款或接受服务的费用经营者提供商品或者服务有欺诈行为的，应当按照消费者的要求增加赔偿其受到的损失，增加赔偿的金额为消费者购买商品的价款或接受服务的费用3.顺序结构常用的几个输入输出方法：常用的几个输入输出方法：常用的几个输入输出方