《第8章__面向对象的程序设计语言——VBA》由会员分享，可在线阅读，更多相关《第8章__面向对象的程序设计语言——VBA（125页珍藏版）》请在金锄头文库上搜索。
1、第8章 VBA编程与模块,通过对本章的学习，需要掌握以下内容：（1）掌握创建模块的基本方法和使用过程的基本方法。（2）熟悉VBA程序设计的基础知识和熟练使用VBA编程环境编辑、调试与运行程序。（3）掌握简单的VBA程序并实现输入与输出。（4）掌握创建与窗体和报表相关的类模块和创建标准模块的方法。,第8章 VBA编程与模块,8.1 VBA概述8.2 模块基本概念8.3 VBA程序设计基础8.4 VBA基本控制结构8.5 面向对象程序设计,8.1 VBA概述,8.1.1 VBA简介8.1.2 VBA编程环境8.1.3 VBE窗口,VBA（Visual Basic For Application）是
2、微软公司Office系列软件中内置的用来开发应用系统的编程语言。VBA 是面向对象的程序设计语言。面向对象程序设计是一种以对象为基础，以事件来驱动对象的程序设计方法。,8.1.1 VBA简介,Office中提供的VBA开发界面称为VBE( Visual Basic Editor ) ，即可视化的Basic 编程环境。在Access中，打开VBE窗口的方法有多种。在模块对象窗口单击“新建”按钮，或打开一个已存在的模块，都会打开VBE窗口。选择工具菜单中“宏”子菜单的“Visual Basic编辑器”命令。使用Alt+F11快捷键打开VBE界面，或切换数据库窗口和VBE窗口。,8.1.2 VBA编
3、程环境,VBE窗口由工具栏、属性窗口、工程资源管理器窗口、代码窗口和立即窗口组成。,8.1.3 VBE窗口,标准工具栏,8.2 模块基本概念,8.2.1模块的类型8.2.2模块的组成,8.2.1模块的类型,模块是Access系统中的一个重要对象，它以VBA(Visual Basic for Application)语言为基础编写，以函数过程(Function)或子过程(Sub)为单元的集合方式存储。模块是Access数据库6个对象之一，其实质就是没有界面的VBA程序。模块具有很强的通用性，窗体、报表等对象都可以调用模块内部的过程。,模块包含若干由VBA代码组成的过程。在Access中，模块分为
4、：1. 类模块2. 标准模块标准模块，它独立存放于数据库中，供其他对象调用；类模块，为事件过程的集合，用于响应窗体或窗体控件的各个事件。例:创建一个标准模块，显示“欢迎使用” 信息。,一个标准模块,一个类模块,过程是模块的组成单元，由VBA代码编写而成。过程分两种类型：1Sub过程2Function过程,8.2.2 模块的组成,1. 过程Sub过程以关键字Sub开始，以End Sub结束，不返回任何值。过程的语法结构如下：Sub 过程名称() 声明变量 基本语句End Sub,2. 函数函数不仅能执行一定的命令，还能根据参数计算出对程序有用的数值，并且可以在表达式中被引用。函数的语法结构如下：
5、Function 函数名称（ ）As 数据类型 声明变量 基本语句End Function,8.3 VBA程序设计基础,8.3.1 数据类型8.3.2 常量与变量8.3.3 运算符与表达式8.3.4 函数,8.3.1 数据类型,（1）字符串型（String）字符串是一个字符的序列，如字母、数字、标点、汉字等都可以定义为字符串类型。字符串数据类型分为定长字符串和变长字符串。定长字符串包含164K个字符，而变长字符串最多可以包含20亿个字符。例：“123”、“AS123”、“东华理工大学”。,（2）数值型在VBA中，数值类型又分为整型、长整型、单精度浮点型和双精度浮点型。整型数据占2字节空间，其范
6、围为3276832767。长整型数据的存储为4字节32位，其范围为21474836482147483647。单精度浮点型数据存储空间也为4字节32位。双精度浮点型数据存储空间为8字节64位。,（3）布尔型（Boolean）布尔（Boolean）数据类型是一个逻辑值，用2字节存储，它的取值只有 True或False。当转换其他的数值类型为Boolean值时，0会成为False，非0值则变成True。当转换Boolean值为其他的数据类型时，False成为0，而True成为-1。,（4）日期型（Date）用来表示日期和时间，占用8个字节，是浮点型数值形式。定义日期类型时必须用“#”符括起来。例：#
7、11/13/88# 、#May 1# 其他的数值类型要转换为Date型时，小数点左边的值表示日期信息，而小数点右边值则表示时间。午夜为0而中午0.5。负整数表示1899年12月30日之前的日期。,（5）货币型（Currency）该类型以8字节（64位）进行存储，并且小数点位数是固定的。（6）变体型（Variant）未被显式声明（用如Dim、Private、Public或Static等语句）为其他类型变量的数据类型。这种类型的数据可以灵活地转换为任何数据类型，当它被赋予不同值时，将自动进行类型的转换。Variant数据类型是一种特殊的数据类型，除了定长字符串类型和用户定义类型之外，它可以包含任何
8、类型的数据。,（7）用户自定义型该数据类型可以包含一个或多个数据类型。格式： Type数据类型名 数据类型元素名 as 系统数据类型名 End Type例：定义一个数据类型用于表示学生信息，包括姓名、出生日期及性别等。再将某一个学生的信息输入到这个自定义数据类型的变量中。,VBA使用常量、变量来存储值。用来保存在程序运行期间数据。（一）常量在程序运行过程中，其值不会被改变的量称为常量。在VBA中有三类常量：直接常量，如：344、3.14159、-23等；固有常量，如： acForm、adAddNew、vbCuruency等；系统定义常量，如True、False、Null等。,8.3.2 常量与
9、变量,符号常量 在程序中，某个常量多次被使用，则可以使用一个符号来代替该常量。 VBA中使用关键字Const 声明符号常量。格式： Const 常量名 As 类型=常数表达式如： Const PI=3.1415926 Const constr=“abcdef”,例：根据输入半径的值，求出圆的面积。Const p = 3.14159Sub area()Dim r As IntegerDim s As Singlep = 3.14r = InputBox(请输入半径)s = p * r * rDebug.Print sEnd Sub,思考：1、此程序是否正确？2、变量与常量的区别？,（二）变量程序
10、运行过程中，值可以改变的量。1、变量命名规则变量名必须以字母或汉字开头，由字母、汉字、数字或下划线组成（不能含有小数点和空格），长度不超过255个字符的字符串；不能使用VBA中的关键字；VBA中不区分变量名的大小写。,2、变量声明,使用变量之前，一般必须先声明变量。 (1)用Dim语句显式声明变量Dim 变量名 As 类型As部分缺省，创建的变量为变体类型Dim i As integer , sum As single,本章目录,说明：为了方便定义，可在变量名后加类型符来代替“AS 类型”。此时变量名与类型符之间不能有空格。例： Dim i As integer , sum As single
11、等价于： Dim i%, sum!例： Dim dp4 As string 等价于: Dim dp4$,用类型标志符声明变量：,一个Dim语句可以同时定义多个变量，但每个变量必须有自己的类型声明，类型声明不能共用，否则为变体型 。例如：Dim m，n As Integer, x，y As Single 则创建了变体型变量m、x，整型变量n和单精度型变量y 。 练习：Dim p1 as string , p5 as string 与语句：Dim p1,p5 as string的区别？,对字符串变量，根据其存放的字符串长度是否固定，其定义方法有两种：Dim 字符串变量名 AS StringDim
12、字符串变量名 AS Strint*字符数例：Dim s1 As String 声明变长字符串Dim s2 As String*50 声明定长字符串变量，可存放50个字符,(2)隐式声明 VBA中允许对使用的变量未进行声明而直接使用（不定义而直接使用的变量），称为隐式声明，其类型为 Variant 类型。注意: 在通用声明处加 Option Explicit 语句可强制显式声明变量。,练习：,1、以下对变量的声明中，不正确的是（ ）A)Dim xinxizhongxin as integerB)Dim b as integerC)Dim x_x as integerD)Dim yy as int
13、eger2、下列符号中，( )不是VBA的合法变量名。A)Inte B)a123C)123a D)x_12,8.3.3 运算符与表达式,1算术运算符与算术表达式2字符串连接符与字符串表达式3关系运算符与关系表达式4逻辑运算符及其表达式5对象运算符与对象运算表达式,8.3.3运算符与表达式,VBA中基本的运算符有：算术运算符、关系运算符、逻辑运算符、字符串运算符。表达式是由运算符、函数和数据等内容组合而成。1算术运算符与算术表达式算术运算符，用来执行简单的数学运算。算术运算符+ 加、- 减 、* 乘 、/ 除 整除、MOD求余 、乘方练习：4+56*7/8 MOD 9,示例与优先级,MOD （求
14、余运算符）如果操作数是小数,系统会四舍五入变成整数后再运算；如果被除数是负数,余数也是负数,反之,如果被除数是正数,余数也是正数。(余数的符号同被除数) 例：10 MOD 2=0 12 MOD 5=2 -12.7 MOD 5=-3练习：19.1 MOD -5,2、关系运算符与关系表达式,将两个操作数进行大小比较，结果为逻辑值。注意：字符串比较,则按字符的ASCII码值从左到右一一比较，直到出现不同的字符为止。,3、字符串连接符与字符串表达式,+：连接字符串 &：可以将不同类型变量连接成字符串注意：+ 两旁的操作数应均为字符型； 1)数值型:则进行算术加运算。 2)一个为数字字符，另一个为数值，
15、自动将数字字符转换为数值后进行算术加。 3)一个为非数字字符，另一个为数值型，出错。,例如：123 + 456 结果 123456 123 & 456 结果 123456 使用 与+的区别：abcdef & 12345 结果为 abcdef12345abcdef +12345 结果为 出错123 & 456 结果为 123456 123 + 456 结果为 579,4、逻辑运算符及其表达式,将操作数进行逻辑运算，结果是逻辑值,表达式1、书写规则 (1) 运算符不能相邻。例a+ -b是错误的。 (2) 乘号不能省略。例x 乘以y 应写成：x*y。 (3) 括号必须成对出现，均使用圆括号。 (4) 表达式从左到右在同一基准上书写，无高低2、运算优先级算术运算符连接运算符关系运算符逻辑运算例：错误的VBA表达式：3=x=7 正确的VBA表达式：3=x And x =7,
