数据库技术7PPT学习教案

1、数据库技术数据库技术7 为什么要使用为什么要使用VBA： 1、编写包含特别复杂的表达式时、编写包含特别复杂的表达式时(如用如用IIF函函数数 不能实现时不能实现时)。 2、要执行、要执行Access标准宏不支持的操作。如标准宏不支持的操作。如事事 务处理（即务处理（即COMMIT,ROLLBACK）。）。 3、动态数据交换，动态数据交换，DDE操作。操作。 4、同时打开两个以上数据库时。、同时打开两个以上数据库时。 5、应用程序文档化。、应用程序文档化。6、建立用户自定义函数时。、建立用户自定义函数时。7、显示详细的出错信息。、显示详细的出错信息。8、创建或操作对象。、创建或操作对象。第1页/

2、共43页7.1 程序设计的概念如单击、双击、鼠标按下等事件。如单击、双击、鼠标按下等事件。第2页/共43页一、基本知识一、基本知识1、VBA基本语法基本语法（1）常用语句：如循环、选择语句等（2）语句的基本成分：变量、常量、函数 、运算符及表达式等。（3）程序的控制结构：如模块、过程2、对象的概念、对象的概念 窗体、报表、控件、表、查询等。3、程序的运行方式、程序的运行方式 事件发生后，对该事件的响应时执行程序。第3页/共43页二、程序设计的一般方法二、程序设计的一般方法1.选择事件并打开VBE（VISUAL BASIC EDIT ） 选择事件属性，点击事件生成器2. 输入VBA代码第4页/共

3、43页3.运行程序 在窗体视图界面，产生事件，即可运行程序。三、对象及对象的集合三、对象及对象的集合Access的对象有表、查询、窗体、报表及各种控件等。所有的同类对象构成对象集合，如所有的窗体构成窗体对象集。对象集合也可作为一个控件对待。对象的属性：描述该对象的各方面的性质。对象的方法：对象所能执行的行为。第5页/共43页方法方法属性属性Database对象对象 Name、QueryTimeOut Updatable CollatingOrder Connect Transactions、 Version OpenRecordset CreateProperty CreateQueryDef

4、 CreateRelation CreateTableDef Execute 、Close 第6页/共43页属性与方法的引用：对象对象.属性属性对象对象.方法方法Docmd . OpenForm “Orders” OpenForm为方法，Orders为参数其他方法有：SelectObject，DeleteObject ，Close，OpenQuery，FindRecord等第7页/共43页7.2 VBE用户界面第8页/共43页第9页/共43页7.3 数据类型数据类型一、数据类型一、数据类型第10页/共43页1 1、表示数值型数据的符号、表示数值型数据的符号 整型：%长整型：&单精度：！ 双精度

5、：、布尔型数据的值、布尔型数据的值 TRUE -1 FALSE 03 3、日期型时间变量的值、日期型时间变量的值 #1JAN98#4 4、VariantVariant数据类型数据类型 定义变量时未指定类型，则默认为Variant类型。5 5、变量的初始化、变量的初始化 定义变量时未指定类型，则默认为Variant类型。第11页/共43页二、变量和常量二、变量和常量变量的作用：存储临时值、计算结果等变量可以是整型、字符串型日期型等，也可以是数据库中的任意对象，如表、查询、窗体等。1、变量的声明、变量的声明先定义，后使用在VBE窗口中，选“工具”菜单中的“选项”，选中“要求声明变量”。则在VBE最

6、上方出现下面说明：OPTION EXPLICITDim i as Intger ; Dim name as String;Dim i, j, k as Intger ; i=10; name=“zhang”第12页/共43页2、变量声明语句的位置、变量声明语句的位置变量的作用范围与声明语句的位置有关（1）过程级别的变量：在过程中或函数中定义的变量且只能用在此过程中或函数中。如图中的sum、value。（2）模块级别的变量：在所有的过程的上部，如a1。（3）全局变量：用Public声明，如图中的name。第13页/共43页3、常量的声明、常量的声明常量的作用范围与声明语句的位置有关，与变量相同。

7、如： Public Const PI=3.1415926; Const Mystr=“hello” , Mydouble as Double=3.4567第14页/共43页三、数据类型转换三、数据类型转换第15页/共43页四、数组四、数组数组是有相同数据类型的元素按一定顺序组成的序列，在内存中连续存放。数组中的每个元素都是变量，可以通过下标来引用。1、数组的声明Dim a(364) as Integer;数组有a(0), a(1), a(2), , a(364)共365个元素，默认下标从0开始。数组下标的指定数组下标的指定（1）Option Base 1; 指定下标从1开始 Dim a(364

8、) as Integer; a(1), a(2), , a(364)（2）Dim a( 2 to 364) as Integer；指定下标范围第16页/共43页2、数组元素的引用 a(3) =10；3、多维数组Dim a(1 to 5, 1 to 10) as Integer; 定义 a 为 5行、10列的二维数组第17页/共43页五、用户自定义数据类型五、用户自定义数据类型称记录类型，有基本数据类型组成，由用户自定义。第18页/共43页Dim Myhome As AddressMyhome . Street = “Green Road”Myhome . Zipcode = “100081”M

9、yhome . Phone = “12345678” ；每个成员分别赋值With Myhome . Street = “Green Road” . Zipcode = “100081” . Phone = “12345678” Endwith第19页/共43页7.4 VBA常用语句常用语句一、语句分类及书写一、语句分类及书写一条语句是一条完整的命令，可包含关键字、运算符、变量、常量和表达式等。可分为3种类型：1、声明语句：如、声明语句：如 Dim a1 as Integer 命名和定义过程、变量、数组以及常数，同时定义了它们的作用范围。其它用来声明的关键字还有ReDim、Static、Publ

10、ic、Private、Const等。第20页/共43页2、赋值语句、赋值语句: 如如 a1=10Input为输入函数，其功能是弹出一个对话框，将输入的内容作为字符串。3、语句的书写格式、语句的书写格式（1）一条语句可分为多行，用“_”作为续行符。（2）一行写多条语句时，用“ ：”分开。第21页/共43页二、选择结构二、选择结构三种基本结构：顺序结构、选择分支结构、循环结构顺序结构、选择分支结构、循环结构选择结构：按照给定的条件进行分析和判断，执行不同代码。1. If.Then.Else语句第22页/共43页第23页/共43页2. Select Case语句第24页/共43页3. With语句对

11、某个对象执行一系列语句时，可以不必重复指出对象的名称。Mylabel.height=2000 不使用With语句Mylabel.width=2000Mylabel.caption=“This is Mylabel”With EndwithWith Mylabel 使用With语句 .height=2000 .width=2000 .caption=“This is Mylabel”Endwith第25页/共43页三、循环结构三、循环结构1. For . Next 语句Dim sum , i as IntegerSum=0For i=1 to 10 step 1 ；step 1 可省略 sum=

12、sum+INext i多次执行某一条或语句序列时，使用循环结构。第26页/共43页2. Do.Loop 语句语句Do While|Until LoopDo Loop While|Until第27页/共43页Dim sum , i as IntegerSum=0Do sum=sum+i i=i+1Loop while i11Dim sum , i as IntegerSum=0Do while i11 sum=sum+i i=i+1Loop 第28页/共43页第29页/共43页Option compare databasePrivate form_load()Dim db as database

13、Dim recname as recordsetDim strname as fieldDim myname(3) as stringDim inti as integerSet db=currentdb()Set recname=db.openrecordset(“名单”)Set strname=recname!姓名Inti=0Do until recname.eof Myname(inti)=strname Inti=inti+1 Recname.movenextLoopMe.姓名列表.rowsourcetype=“值列表”Me.姓名列表. rowsource=myname(0)For inti=1 to 3 Me.姓名列表. rowsource= Me.姓名列表. rowsource & ” ; ” & myname(i)Next IEnd exit第30页/共43页7.5 过程过程一、一、 子过程子过程过程是将VBA语句的声明和执行语句集合在一起，并有一个过程名的程序单位。有子过程、函数过程、属性过程三种。第31页/共43页二、函数过程第32页/共43页三、变量的作用域1. 变量(或常量)的公共作用域Public与私有作用域Private2. 使用Static语句