14第14章 VBA编程与模块.ppt

1、计算中心,第14章 VBA编程与模块,计算机语言的作用,00100001,计算机，你知道12加21是多少,C、C+、VB、VC、Java、C#、.Net,机器语言,自然语言,编程语言,本章将要了解什么问题,VBA是什么,为什么要使用VBA?VBA代码可以自动生成吗？如果我要使用VBA编程需要那些知识？编程基础、程序控制、面向对象的概念、模块,VBA编程与模块知识结构图：,本章内容,4.,3.,2.,1.,5.,VBA简介,自动生成VBA代码,VBA程序设计基础,程序基本结构,编程和事件,14.1 VBA简介,什么是VBA? VBA（Visual Basic for Applications）是

2、广泛流行的可视化应用程序开发语言VB（Visual Basic）的子集，不包含VB所有功能。VBA语法简单但功能强大，支持基于面向对象（OOP）的程序设计，非常适合初学者使用。作为一种嵌入式语言，VBA编程环境和VBA程序都必须依赖Office应用程序（如Access、Word、Excel等）Office自动化服务的。,将现有的宏转换为VBA代码（见第13章 宏） 用命令按钮向导创建VBA代码 当ACCESS用向导创建一个命令按钮时，它创建一个事件过程（VBA代码）并将其附加到按钮上。 可以打开“事件过程”查看其如何工作，然后按自己需要对其进行修改。 查看代码方法： 打开需要查看按钮所属窗体的

3、“设计视图”。 打开要查看按钮的属性窗口。 选择“事件”选项卡，单击“单击”事件属性的生成器按钮 ，显示命令按钮的带有过程的模块窗口。如下图：,14.2 自动生成VBA代码,14.2 自动生成VBA代码,14.3 VBA程序设计基础,VBA编程环境 了解模块 模块是由VBA语言编写的程序的集合，编写的程序代码被存放于模块的过程中。 两类基本模块可存储在数据库中 窗体/报表模块：窗体/报表后台的代码。 标准模块：保存在模块对象中，独立于窗体/报表。,14.3 VBA程序设计基础,模块窗口,编写代码,14.3 VBA程序设计基础,如何进入模块窗口 窗体/报表属性窗口事件生成器按钮 。 在窗体或报表

4、的“设计视图”中单击工具栏上代码按钮 。 在数据库窗口中，单击菜单“工具”宏“Visual Basic编辑器”命令。 选择数据库模块对象，单击数据库窗口中“新建”或者双击其中一个已经存在的模块对象。 在窗体或报表“设计视图”单击工具栏生成器按钮 ，选择代码生成器。,14.3 VBA程序设计基础,数据类型 为什么要有各种不同的数据类型 设计表结构时是如何决定各字段数据类型的,14.3 VBA程序设计基础,VBA提供了较为完备的数据类型，Access数据表中字段使用的数据类型（OLE对象和备注字段数据类型除外）在VBA中都有对应的类型。 包括布尔型(Boolean)、日期型(Date)、字符串(S

5、tring)、货币型(Currency)、字节型(Byte)、整数型(Integer)、长整型(Long)、单精度型(Single)、双精度型(Double)、对象(Object)、变体型(Variant)和用户自定义型(Type) 。,14.3 VBA程序设计基础,14.3 VBA程序设计基础,常量 直接常量即常数，其类型和值由书写形式确定例如：1.23 、 “12ABC“ 、True、#2001/3/10# 符号常量Const 常量 AS 类型 = 常量表达式例如：Const PI = 3.14159 阅读程序：Dim sngCircle As SingleConst PI = 3.141

6、59sngCircle = 2 * PI * 25 系统常量是Visual BASIC系统预先定义好的，用户可直接引用。例如： vbRed vbOK vbYes,14.3 VBA程序设计基础,变量,14.3 VBA程序设计基础,变量 内存存储单元一个符号名 通过引用符号名来访问其所对应的存储单元 使用变量有三个步骤： 声明变量：告诉程序要使用的变量的名称和数据类型。 变量赋值：赋予变量一个要保存的值。 使用变量：检索变量中保存的值，并在程序中使用它。,14.3 VBA程序设计基础,声明变量 命名变量 必须以字母字符开头。 不能包含内嵌的空格，不能使用VBA关键字。 必须有唯一的名称。 不多于2

7、55个字符。 工程上命名一般要遵守一定的规范，如：匈牙利表示法，即“前缀+变量含义”，变量的含义为一个或多个英文单词，变量前缀为三个小写字母示意其类型。 例如：intCount, strName, curSalary,14.3 VBA程序设计基础,声明变量语句 Dim语句的格式Dim 变量名 AS 类型,变量名 AS 类型例如： Dim strName as string 在程序中，通过Dim语句声明了变量名和数据类型，称为显示声明；如果在Dim语句中只定义了变量名，未定义数据类型，或没有变量声明语句而通过赋值语句直接使用，称为隐式声明。 通过设置“要求变量声明”，所有变量必须进行显示说明，称

8、为强制声明。 变量作用域：变量在程序中的作用范围，后续讲解。,14.3 VBA程序设计基础,变量赋值 使用“=”。 说明： 格式中的等号称为赋值号，与数学中等号意义不同，如表达式a=a+1在数学上不成立，在赋值语句中经常使用。 赋值号左边只能是变量名，不能是常量或表达式。 赋值语句有计算和赋值双重功能，将赋值号右边的计算结构赋给左边的变量。 赋值号两边要类型匹配。 例如：strName= “Tom“intCount=300*4,14.3 VBA程序设计基础,使用变量 阅读一段简单的程序：Dim intA As Integer, intB As IntegerDim intSum As Inte

9、gerintA = 3200intB = 760intSum = intA + intB,14.3 VBA程序设计基础,常用系统函数 数学函数,14.3 VBA程序设计基础,函数举例： 通过int()和rnd()函数可产生某个范围的随机整数 公式：Int(上限 下限 + 1) * Rnd + 下限) 如：int(10*rnd)，产生0-9之间的随机整数int(101*rnd+100)，产生100-200之间的随机整数,14.3 VBA程序设计基础,字符函数,14.3 VBA程序设计基础,转换函数,14.3 VBA程序设计基础,日期函数,14.3 VBA程序设计基础,测试函数,14.3 VBA程

10、序设计基础,颜色函数 （1）QBColor函数QBColor(N)功能：通过N（颜色代码）的值产生一种颜色。 （2）RGB函数RGB(N1,N2,N3)功能：通过N1,N2,N3（红、绿、蓝）三种基本颜色代码产生一种颜色，其中N1,N2,N3的取值范围为0255之间的整数。例如：RGB（255，0，0）产生的颜色是“红”色。,14.3 VBA程序设计基础,输入/输出函数 输出函数Msgbox格式：msgbox（显示信息，按钮数目+图标类型，标题栏字符串）功能：在对话框中显示消息，等待用户单击按钮，返回一个整数，该值代表用户单击了哪个按钮。例如：intSelect=MsgBox (“选择正确吗？

11、”,vbQuestion + vbOKCancel + vbDefaultButtion1, “项目选择”),提示：帮助了解更详细,14.3 VBA程序设计基础,输入函数inputBox 格式：inputBox（提示信息，标题栏字符串，默认值） 功能：提示用户输入一个字符串或数值。 说明： （1）“提示信息”是必选项，是一个字符串，显示在输入框中。 （2）“标题栏字符串”是可选项，省略此项，标题栏将显示应用程序名。 （3）默认值是可选项，是字串或数字，省略此项，系统会自动匹配数据类型。 （4）函数返回值是在输入框中输入的数字或字符串。,14.3VBA程序设计基础,例如:当执行下列命令后，将显示

12、图所示的输入窗口 ame= InputBox(“输入查询的学生姓名“, “输入命令演示“, , , , “demo.hlp“, 10),标题信息,提示信息,默认值,14.3 VBA程序设计基础,表达式 算术运算符及表达式,14.3 VBA程序设计基础,字符运算符及表达式,14.3 VBA程序设计基础,关系运算符及表达式,14.3 VBA程序设计基础,逻辑运算符及表达式,逻辑运算规则：,14.3 VBA程序设计基础,编码规则 命名规则（见命名变量） 程序注释注释语句是非执行语句，用来提高程序的可读性，不被解释和编译。注释语句显示为绿色。格式1：rem 注释内容说明：用rem引导的注释语句，如果放

13、在其他语句后面，之间用冒号分隔。格式2： 注释内容说明：用单引号引导的注释语句，放在其他语句后面时无需使用冒号分隔。,14.3 VBA程序设计基础,注释语句举例：,14.3 VBA程序设计基础,立即窗口 是检验函数、程序如何运行的非常好的工具 启动立即窗口方法 在模块窗口，选择菜单【视图】|【立即窗口】或按Ctrl+G,语句的构成 由保留字及语句体构成，语句体又是由命令短语和表达式构成的。 保留字：系统规定的“专用”符号，指示计算机“做什么”，必须严格按系统要求来写。 语句体：表达式由用户定义、用户要按语法规则来写。 例如：Dim intA1 As Integer程序书写规则 通常每条语句占一

14、行，一行最多允许255个字符。 一行书写多条语句，语句之间用冒号“:”隔开。 语句一行写不完，可用连接符空格和下划线“_”。,14.3 VBA程序设计基础,14.4 程序基本结构,什么是流程控制 我们一天的生活 早上起床 刷牙洗脸 吃早饭 上午上四节课 午餐 午休 下午上四节课 程序也和日常生活一样，是按照顺序执行的，这就是流程,14.4 程序基本结构,实际的流程并非完全是按顺序的，它可能会因为一些原因发生变化。 日常生活的例子 早上起床 刷牙洗脸（没有牙膏、停水） 吃早饭 上午上课（老师生病） 程序的执行，也会因情况不同，执行过程产生一些变化。,14.4 程序基本结构,程序执行的顺序因为情况

15、的变化而选择不同的执行过程，称之为流程控制(flow control)。 流程控制是计算机程序的灵魂，我们将会学到： 条件判断 判断条件的真假，然后程序根据真假选择不同过程执行 If语句和Select Case语句 循环控制 程序依指定的条件做判断, 若条件成立则进入循环执行循环內的动作。每执行完一次循环內动作，便再回头做一次条件判段, 直到条件不成立後才结束循环。 For语句和While语句。,14.4 程序基本结构,顺序结构 根据程序中语句的书写顺序依次执行的语句序列。 流程图：,14.4 程序基本结构,分支结构 分支结构最常用到的就是 if 语句, 它就如同日常生活中常使用的如果就 是一

16、样的意思。比方說如果明天没下雨, 就去爬山以图形来表示就是,14.4 程序基本结构,IF语句 单路分支： 格式一： If ThenEnd If格式二：If Then ,14.4 程序基本结构,例如:输出两个整数中的最大数。,Dim intA As Integer, intB As IntegerintA = 12: intB = 8If intA intB Then intA = intBMsgBox “最大值为：“ & intA, vbInformation, “消息框“,14.4 程序基本结构,双路分支 格式一： If ThenElseEnd If 格式二：If Then Else ,14

17、.4 程序基本结构,你有钱吗？,？,大国的提问,Dim intReturen As IntegerintReturen = MsgBox(“你有钱吗？“, vbQuestion + vbYesNo, “提问“)If intReturen = vbYes Thenmsgbox “借我一些吧！“Elsemsgbox “我也没有钱哪！“End If,14.4 程序基本结构,多分支,期末数据库考试 90分以上出国游 80分买笔记本电脑 70分逛街 不及格吃一个月馒头 多分支语句和上面的例子类似 使用SELECT CASE 语句,14.4 程序基本结构,Select Case语句，根据多个表达式列表的值

18、，选择多个操作中的一个对应执行格式：Select Case Case Case Case Case Else End Select,14.4 程序基本结构,编程完成上述任务,Dim intScore As IntegerintScore = Val(InputBox(“请输入期末VB课程考试成绩“, “提示输入“)Select Case intScoreCase 90 To 100MsgBox “恭喜，你可以出国旅游了，祝旅途愉快！“Case 80 To 89MsgBox “恭喜，买一台心爱的笔记本电脑，再接再厉！“Case 70 To 79MsgBox “还需努力，不要放弃学习，逛逛街放松一

19、下心情吧。“Case 0 To 59MsgBox “埋头苦学，惩罚自己吃一个月馒头。“Case ElseMsgBox “成绩输入有误。“End Select,14.4 程序基本结构,多分支流程图：,14.4 程序基本结构,Select Case语句说明 多个分支中只能选择执行一个，执行了第一个符合条件的分支以后，即使有其他分支符合条件也不再执行。 select case后面的表达式通常是一个变量的名字。 select case与end select要成对出现，end select之间有空格。 case后面的值有4种写法： 单一数值 一行并列数值，之间用逗号分隔 数值1 to 数值2，前一个值必

20、须比后一个值小。 可用is开头的简单条件式，如is10。不允许复杂条件式。,14.4 程序基本结构,循环结构 顺序、分支结构在程序执行时，每个语句只能执行一次，循环结构则能够使某些语句或程序段重复执行若干次。 语句格式 For语句“计数型”，以指定的次数重复执行。 While语句“当型”，通过循环条件控制重复执行，未知循环次数。,14.4 程序基本结构,For语句 格式 For to Step Exit For Next 功能用循环计数器来控制内的语句的执行次数。,14.4 程序基本结构,例：绘制如下图形,程序代码：Dim i As IntegerFor i = 1 To 5Debug.Pri

21、nt “*“Next i,14.4 程序基本结构,例：计算1-100之间所有自然数的和 Dim intTotal As Integer Dim i As IntegerintTotal = 0For i = 1 To 100intTotal = intTotal + iNext iMsgBox intTotal,计算1-10之间所有自然数之积，即10！,14.4 程序基本结构,例：计算1-100之间所有所有能被3整除的自然数之和 Dim intTotal As Integer Dim i As IntegerintTotal = 0For i = 3 To 100 Step 3intTotal

22、 = intTotal + iNext iMsgBox intTotal,计算1000-2000的奇数或偶数之和。,14.4 程序基本结构,For语句的流程图,14.4 程序基本结构,While语句 格式 While Wend 功能当为True时，执行内的语句，遇到Wend语句后，再次返回，继续测试是否为True，直到为False，执行Wend语句的下一条语句。,14.4 程序基本结构,例：计算1-100之间所有自然数的和 Dim intTotal As Integer Dim i As IntegerintTotal = 0i = 1While i = 100intTotal = intTo

23、tal + ii = i + 1WendMsgBox intTotal,14.4 程序基本结构,循环结构的其他语法格式 Do While |Until 条件循环体Exit Do Loop 或 Do 循环体Exit Do Loop While |Until 条件 当条件成立，则执行循环体，遇到LOOP返回到DO语句，继续判断条件，不成立，则退出循环，执行LOOP后面的语句，Exit Do语句可中止循环的执行。,14.4 程序基本结构,程序举例(猜数游戏),想一个09之间的数,猜对: right 猜错:wrong并提示大小,14.4 程序基本结构,分析过程,可能要猜多次， 通过循环结构实现,随机数

24、,14.4 程序基本结构,程序代码,思考：限制猜数次数不超过3次，程序该如何编写？,14.4 程序基本结构,过程(Sub)和函数(Function) 一个模块中包含有若干过程或函数。 编写的一段程序代码被保存为一个过程或函数。 通过调用已经编写好的过程或函数，执行其功能。 过程和函数存放在模块中： 与窗体和报表的有关的过程/函数存放在窗体和报表模块。 独立于窗体和报表的过程/函数存放在标准模块。 过程与函数的区别：过程没有返回值，函数有返回值。,14.4 程序基本结构,过程 自动生成的过程（窗体和报表）：如窗体的关闭按钮事件过程。,Private Sub cmdClose_Click() On

25、 Error GoTo Err_cmdClose_ClickDoCmd.CloseExit_cmdClose_Click:Exit SubErr_cmdClose_Click:MsgBox Err.DescriptionResume Exit_cmdClose_ClickEnd Sub,14.4 程序基本结构,创建自定义过程例如：将计算1-100自然数之和的程序代码创建为过程“sumOfnumber”保存在标准模块。,Sub sumOfnumber()Dim intTotal As IntegerDim i As IntegerintTotal = 0For i = 1 To 100intTo

26、tal = intTotal + iNext iDebug.Print intTotal End Sub,14.4 程序基本结构,调用过程的方法call 过程名,14.4 程序基本结构,计算某个范围的自然数之和 创建带参数的过程,Sub sumOfTwoNumber(op1 As Integer, op2 As Integer)Dim intTotal As LongDim i As IntegerintTotal = 0For i = op1 To op2intTotal = intTotal + iNext iDebug.Print intTotal End Sub,14.4 程序基本结构

27、,调用带参数的过程call 过程名（)如调用过程“sumOfTwoNumber”call sumOfTwoNumber(200,300)，计算200-300的自然数之和。参数传递 可通过值、变量或表达式来传递。 注意参数的个数和数据类型须和过程一致。,14.4 程序基本结构,将两个自然数求和的计算结果返回 创建函数调用：同系统函数的使用，出现在表达式中，求得函数的返回值。,Function sumOfNumberF(op1 As Integer, op2 As Integer) As LongDim i As IntegersumOfNumberF = 0For i= op1 To op2su

28、mOfNumberF= sumOfNumberF + INext IDebug.Print sumOfNumberFEnd Function,14.4 程序基本结构,变量的作用域 变量在程序中的有效范围私有变量，变量只在某个模块或过程中使用 模块级使用Private语句 过程级使用dim语句 共有变量：变量在整个数据库文件的所有模块都可使用 Public语句,数据库文件,窗体/报表模块,标准模块,过程/函数,过程/函数,14.5 编程和事件,引入面向对象编程的概念 对象：是系统中的基本运行实体，如窗体、报表、构成窗体/报表的控件 对象的三要素 属性(property)：对象的性质和状态特征 方

29、法(method)：对象的动作或功能 事件(event)：对象相应的行为,14.5 编程和事件,属性（Property）：对象的性质和状态特征 属性包括名称、标题、前景和背景颜色、字体等。 属性设置的两种方法： 在设计阶段，用属性窗口设置 在程序代码中用赋值语句设置对象.属性=属性值,14.5 编程和事件,引用对象及其属性使用的运算符和特殊保留字 感叹号（!）：引用对象 如：Forms!员工引用“员工”窗体对象Forms!员工!姓名引用“员工”窗体中的“姓名”控件 引用对象时使用的特殊保留字： Forms：数据库中窗体集合，用来确定某个特定的窗体 Reports：数据库中报表集合，用来确定某个

30、特定的报表 Screen：用于拥有焦点的特定窗体、报表或控件如：Screen.ActiveControl,引用当前控件 Me：用来引用活动的窗体、报表等如：Me!姓名（Me.姓名）当前窗体的“姓名”控件,14.5 编程和事件,圆点（.）运算符：指定对象的属性或方法，紧跟在对象之后 如：Forms!员工!姓名.ForeColor = vbRed设置“员工”窗体的“姓名”控件前景色为红色Forms!员工!姓名.ForeColor = vbRed,引用对象,属性,属性值,14.5 编程和事件,With语句 格式：With End With,举例：With Forms!员工!姓名.FontName =

31、 “隶书“.FontSize = 12.ForeColor = vbRedEnd With,上例With语句相当于： Forms!员工!姓名.FontName = “隶书“Forms!员工!姓名.FontSize = 12Forms!员工!姓名.ForeColor = vbRed,14.5 编程和事件,方法（Method）:也是对象的一种行为，特定对象允许的特定操作，由系统提供，用户可以直接调用，从而简化编程 调用方法的语法格式是:对象.方法参数列表其中，对象指方法所作用的目标，如窗体、文本框等方法用命令动词表示，如Setfocus、Gotopage等参数列表是方法要求提供的参数如：Me.商品

32、编号.SetFocus当前窗体对象的“商品编号”控件得到焦点,14.5 编程和事件,事件（Event）:是对象的行为，即在对象上施加的操作，它发生在用户与应用程序交互时。,14.5 编程和事件,实例：制作“计算器”,14.5 编程和事件,Docmd对象 Docmd是Access的一个特殊对象，用来调用内置方法，在程序中实现对Access的操作，诸如打开窗口、关闭窗体、打开报表、关闭报表等。 调用内置方法通常需要参数如：DoCmd.OpenForm “员工“内置方法和所需参数在输入过程中系统自动提示 举例：窗体的关闭按钮“单击”事件,内置方法,参数,14.5 编程和事件,窗体、报表、控件事件 A

33、ccess事件是用户某个操作的结果，比如按钮“单击”事件，Access为窗体、报表、控件提供了50多个事件，分为7组： 窗口（窗体、报表）事件：打开、关闭和调整大小 数据事件：删除或更新 焦点事件：激活、进入和退出 键盘事件：按下后松开某个键 鼠标事件：单击、双击或按下鼠标 打印事件：格式化和打印 出错和计时事件：在错误产生后或一段时间后发生,14.5 编程和事件,事件怎样触发操作 当用户执行某个事件时，可以让Access运行一个过程 在哪里触发事件过程 选择“事件过程”选项来触发事件,14.5 编程和事件,ADO数据对象 ADO简介 Active Data Objects，是一种提供访问各种

34、数据类型的连接机制，通过其内部的属性和方法提供统一的数据访问接口方法。 ADO可以让应用程序直接访问并修改数据 ADO的主要对象连接connection、命令command、记录集recordsetConnection对象与RecordSet对象是两个ADO中最重要的对象。RecordSet对象可以分别与Connection对象和Command对象联合使用,也可单独使用（隐含建立前两个对象）。,14.5 编程和事件,Recordset对象（最常用、最重要） 记录集(Recordset)：对表执行查询操作时，返回的一组特定记录，好比内存中的虚拟数据表用记录集可执行的操作：对表中的数据进行查询和统

35、计，在表中添加、更新或删除记录。,14.5 编程和事件,创建RecordSet对象实例,连接“登录日志”表,连接到当前数据库,14.5 编程和事件,Recordset对象常用属性和方法 Open方法：打开记录集 RecordCount属性：返回记录集中的记录数 Bof、Eof属性：判断当前记录指针是否指向记录集的开头或结尾，返回值为True或False MoveFirst、MovePrevious、MoveNext、MoveLast、Move方法：移动记录指针 AddNew、Delete、Update、CancelUpdate方法：用来添加、删除和更新记录。 Close方法：关闭记录集,14.

36、5 编程和事件,举例：用户登录成功后，记录登录用户名到“登录日志”表中,14.5 编程和事件,举例：访问“阳光超市管理系统”中的“商品”表，编写函数GoodsName，输入商品编码，返回商品名称,Function GoodsName(GoodsID As String) As String Dim rst As New ADODB.Recordsetrst.Open “select 名称 from 商品 where 商品编号=“ & GoodsID & “, _CurrentProject.AccessConnection, adOpenForwardOnly, adLockOptimisti

37、cIf rst.RecordCount 0 ThenGoodsName = rst!名称ElseGoodsName = “End Ifrst.CloseSet rst = NothingEnd Function,14.5 编程和事件,使用ADO的一般过程是：1、创建和打开一个连接2、执行查询得到记录集3、对记录集进行处理4、关闭连接,14.5 编程和事件,VBA程序的调试和错误处理 编译创建完子过程或函数之后，要确保所有语法都是正确的，可以选择VBA菜单上的【调试】|【编译】命令来对其进行编译。如果编译过程不成功，将会出现错误信息窗口 调试 是指在编写程序时，查找并修改错误的过程调试工具栏,1

38、4.5 编程和事件,工具栏按钮说明,14.5 编程和事件,调试方法 设置断点 断点：用于监视将要执行的某个特定代码行，并使程序在该语句处停止 设置方法： 单击要设置断点处命令行左边空白区域即断点设置区，再次单击可取消 定位命令行，执行菜单【调试】|【切换断点】命令，设置或取消断点 定位命令行，单击调试工具栏【切换断点】按钮，设置或取消断点 定位命令行，按下键【F9】，设置或取消断点,14.5 编程和事件,单步跟踪当运行到某个断点后，选择【调试】|【逐语句】或按下键【F8】，就可以使程序运行到下一行，这样逐步检查程序的运行情况，直至找到问题所在 设置监视点添加监视窗口：选定要监视的变量，然后单击

39、鼠标右键，执行弹出菜单【添加监视】命令，或执行菜单【调试】|【添加监视】命令，会显示监视窗口，同时在监视窗口中该变量或表达式的状态 本地窗口可以监视当前过程中所有变量的状态 立即窗口 课堂演示调试过程,14.5 编程和事件,VBA错误处理元素 VBA错误语句On Error GoTo 标号如果发生错误，程序会跳到标号处运行Resume 标号程序从错误处理返回到主过程,Private Sub cmdFirst_Click() On Error GoTo Err_cmdFirst_ClickDoCmd.GoToRecord , , acFirstExit_cmdFirst_Click:Exit SubErr_cmdFirst_Click:MsgBox Err.DescriptionResume Exit_cmdFirst_ClickEnd Sub,14.5 编程和事件,Err对象 由VBA创建的 当发生某个错误时，关于该错误的信息被保存在Err对象中 常使用的两个属性： Number：错误号 Description：错误描述,小结与提问,