《数据库技术7学习教案.pptx》由会员分享，可在线阅读，更多相关《数据库技术7学习教案.pptx（43页珍藏版）》请在taowenge.com淘文阁网|工程机械CAD图纸|机械工程制图|CAD装配图下载|SolidWorks_CaTia_CAD_UG_PROE_设计图分享下载上搜索。
1、数据库技术数据库技术(jsh)7第一页，共43页。为什么要使用为什么要使用VBA：1、编写包含特别复杂的表达式时、编写包含特别复杂的表达式时(如用如用IIF函数函数 不能实现时不能实现时)。2、要执行、要执行Access标准宏不支持的操作。如事标准宏不支持的操作。如事 务处理（即务处理（即COMMIT,ROLLBACK）。）。3、动态数据交换，、动态数据交换，DDE操作。操作。4、同时、同时(tngsh)打开两个以上数据库时。打开两个以上数据库时。5、应用程序文档化。、应用程序文档化。6、建立用户自定义函数时。、建立用户自定义函数时。7、显示详细的出错信息、显示详细的出错信息(xnx)。8、创
2、建或操作对象。、创建或操作对象。第1页/共43页第二页，共43页。7.1 程序设计(chn x sh j)的概念如单击、双击、鼠标按下等事件如单击、双击、鼠标按下等事件(shjin)。第2页/共43页第三页，共43页。一、基本知识一、基本知识1、VBA基本语法基本语法（1）常用语句：如循环、选择语句等）常用语句：如循环、选择语句等（2）语句的基本成分：变量、常量、函数）语句的基本成分：变量、常量、函数(hnsh)、运算符及表达式等。、运算符及表达式等。（3）程序的控制结构：如模块、过程）程序的控制结构：如模块、过程2、对象、对象(duxing)的概念的概念 窗体、报表、控件、表、查询等。窗体、
3、报表、控件、表、查询等。3、程序的运行方式、程序的运行方式 事件发生事件发生(fshng)后，对该事件的响应时执行程序。后，对该事件的响应时执行程序。第3页/共43页第四页，共43页。二、程序设计二、程序设计(chn x sh j)的一般方法的一般方法1.选择(xunz)事件并打开VBE（VISUAL BASIC EDIT）2.选择(xunz)事件属性，点击事件生成器2.输入(shr)VBA代码第4页/共43页第五页，共43页。3.运行(ynxng)程序4.在窗体视图界面，产生事件，即可运行(ynxng)程序。三、对象三、对象(duxing)及对象及对象(duxing)的集合的集合Access
4、的对象有表、查询、窗体、报表及各种(zhn)控件等。所有的同类对象构成对象集合，如所有的窗体构成窗体对象集。对象集合也可作为一个控件对待。对象的属性：描述该对象的各方面的性质。对象的方法：对象所能执行的行为。第5页/共43页第六页，共43页。方法方法属性属性Database对象对象 Name、QueryTimeOut Updatable CollatingOrder Connect Transactions、Version OpenRecordset CreateProperty CreateQueryDef CreateRelation CreateTableDef Execute、Clos
5、e 第6页/共43页第七页，共43页。属性与方法(fngf)的引用：对象对象(duxing).属性属性对象对象(duxing).方法方法Docmd.OpenForm “Orders”OpenForm为方法(fngf)，Orders为参数其他方法有：SelectObject，DeleteObject，Close，OpenQuery，FindRecord等第7页/共43页第八页，共43页。7.2 VBE用户界面(yn h ji min)第8页/共43页第九页，共43页。第9页/共43页第十页，共43页。7.3 数据类型数据类型一、数据类型一、数据类型第10页/共43页第十一页，共43页。1 1、表
6、示数值、表示数值(shz)(shz)型数据的符号型数据的符号 整型：整型：%长整型：长整型：&单精度：！单精度：！双精度：双精度：、布尔型数据、布尔型数据(shj)(shj)的值的值 TRUE TRUE -1-1 FALSE FALSE 0 03 3、日期、日期(rq)(rq)型时间变量的值型时间变量的值#1JAN98#1JAN98#4 4、VariantVariant数据类型数据类型 定义变量时未指定类型，则默认为Variant类型。5 5、变量的初始化、变量的初始化 定义变量时未指定类型，则默认为Variant类型。第11页/共43页第十二页，共43页。二、变量二、变量(binling)和
7、常和常量量变量(binling)的作用：存储临时值、计算结果等变量可以是整型、字符串型日期(rq)型等，也可以是数据库中的任意对象，如表、查询、窗体等。1、变量的声明、变量的声明先定义，后使用在VBE窗口中，选“工具”菜单中的“选项”，选中“要求声明变量”。则在VBE最上方出现下面说明：OPTION EXPLICITDim i as Intger ;Dim name as String;Dim i,j,k as Intger ;i=10;name=“zhang”第12页/共43页第十三页，共43页。2、变量声明语句、变量声明语句(yj)的位置的位置变量(binling)的作用范围与声明语句的位
8、置有关（1）过程级别的变量(binling)：在过程中或函数中定义的变量(binling)且只能用在此过程中或函数中。如图中的sum、value。（2）模块级别的变量：在所有的过程的上部，如a1。（3）全局变量：用Public声明，如图中的name。第13页/共43页第十四页，共43页。3、常量、常量(chngling)的声明的声明常量的作用范围与声明语句(yj)的位置有关，与变量相同。如：Public Const PI=3.1415926;Const Mystr=“hello”,Mydouble as Double=3.4567第14页/共43页第十五页，共43页。三、数据三、数据(shj)
9、类型转换类型转换第15页/共43页第十六页，共43页。四、数组四、数组数组是有相同数据类型的元素按一定顺序组成(z chn)的序列，在内存中连续存放。数组中的每个元素都是变量，可以(ky)通过下标来引用。1、数组的声明(shngmng)Dim a(364)as Integer;数组有a(0),a(1),a(2),a(364)共365个元素，默认下标从0开始。数组下标的指定数组下标的指定（1）Option Base 1;指定下标从1开始 Dim a(364)as Integer;a(1),a(2),a(364)（2）Dim a(2 to 364)as Integer；指定下标范围第16页/共43
10、页第十七页，共43页。2、数组元素(yun s)的引用 a(3)=10；3、多维数组Dim a(1 to 5,1 to 10)as Integer;定义(dngy)a 为 5行、10列的二维数组第17页/共43页第十八页，共43页。五、用户五、用户(yngh)自定义数自定义数据类型据类型称记录(jl)类型，有基本数据类型组成，由用户自定义。第18页/共43页第十九页，共43页。Dim Myhome As AddressMyhome.Street=“Green Road”Myhome.Zipcode=“100081”Myhome.Phone=“12345678”；每个成员(chngyun)分别赋
11、值With Myhome .Street=“Green Road”.Zipcode=“100081”.Phone=“12345678”Endwith第19页/共43页第二十页，共43页。7.4 VBA常用常用(chn yn)语句语句一、语句一、语句(yj)分类及书分类及书写写一条(y tio)语句是一条(y tio)完整的命令，可包含关键字、运算符、变量、常量和表达式等。可分为3种类型：1、声明语句：如、声明语句：如 Dim a1 as Integer 命名和定义过程、变量、数组以及常数，同时定义了它们的作用范围。其它用来声明的关键字还有ReDim、Static、Public、Private、
12、Const等。第20页/共43页第二十一页，共43页。2、赋值语句、赋值语句(yj):如如 a1=10Input 为输入函数，其功能是弹出一个(y)对话框，将输入的内容作为字符串。3、语句、语句(yj)的书写格式的书写格式（1）一条语句可分为多行，用“_”作为续行符。（2）一行写多条语句时，用“：”分开。第21页/共43页第二十二页，共43页。二、选择二、选择(xunz)结构结构三种(sn zhn)基本结构：顺序结构、选择分支结构、循环结构选择结构：按照给定的条件(tiojin)进行分析和判断，执行不同代码。1.If.Then.Else语句第22页/共43页第二十三页，共43页。第23页/共4
13、3页第二十四页，共43页。2.Select Case语句(yj)第24页/共43页第二十五页，共43页。3.With语句(yj)对某个对象执行一系列语句时，可以不必(bb)重复指出对象的名称。Mylabel.height=2000 不使用(shyng)With语句Mylabel.width=2000Mylabel.caption=“This is Mylabel”With EndwithWith Mylabel 使用With语句 .height=2000 .width=2000 .caption=“This is Mylabel”Endwith第25页/共43页第二十六页，共43页。三、循环三
14、、循环(xnhun)结构结构1.For .Next 语句(yj)Dim sum,i as IntegerSum=0For i=1 to 10 step 1 ；step 1 可省略(shngl)sum=sum+INext i多次执行某一条或语句序列时，使用循环结构。第26页/共43页第二十七页，共43页。2.Do.Loop 语句语句(yj)Do While|Until LoopDo Loop While|Until第27页/共43页第二十八页，共43页。Dim sum,i as IntegerSum=0Do sum=sum+i i=i+1Loop while i11Dim sum,i as In
15、tegerSum=0Do while i11 sum=sum+i i=i+1Loop 第28页/共43页第二十九页，共43页。第29页/共43页第三十页，共43页。Option compare databasePrivate form_load()Dim db as databaseDim recname as recordsetDim strname as fieldDim myname(3)as stringDim inti as integerSet db=currentdb()Set recname=db.openrecordset(“名单(mngdn)”)Set strname=re
16、cname!姓名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页第三十一页，共43页。7.5 过程过程(guchng)一、一、子过程子过程(guchng)过程是将VBA语句(yj)的声明和执行语句(yj)
17、集合在一起，并有一个过程名的程序单位。有子过程、函数过程、属性过程三种。第31页/共43页第三十二页，共43页。二、函数(hnsh)过程第32页/共43页第三十三页，共43页。三、变量(binling)的作用域1.变量(或常量)的公共作用域Public与私有作用域Private2.使用Static语句声明变量:能够(nnggu)记住上次使用后的值。3.使用Static关键字声明(shngmng)过程第33页/共43页第三十四页，共43页。四、属性(shxng)过程第34页/共43页第三十五页，共43页。7.6 VBA程序设计(chn x sh j)举例一、控制数据输入输出格式(g shi)第35页/共43页第三十六页，共43页。第36页/共43页第三十七页，共43页。二、打开(d ki)、关闭窗体第37页/共43页第三十八页，共43页。三、新建表、删除(shnch)表第38页/共43页第三十九页，共43页。四、消息(xio xi)框的使用第39页/共43页第四十页，共43页。五、运行外部(wib)程序第40页/共43页第四十一页，共43页。六、编写(binxi)动画程序1.创建(chungjin)窗体2.编写事件处理过程 第41页/共43页第四十二页，共43页。本章(bn zhn)作业要求VBA编程练习(linx)第42页/共43页第四十三页，共43页。