Access16复习面向对象程序设计.ppt

Access数据库（第10章）,2009年,1,复习第一章：数据库系统与Access基础知识,基本概念:数据库,数据模型,数据库管理系统 关系数据库基本概念:关系模型,关系,实体,元组,属性,字段,域,值,主关键字 关系运算基本概念:选择、投影、连接运算 数据库设计：基本原则与步骤 access系统简介：特点与功能，基本对象（表、查询、窗体、报表、页、宏、模块）,启动与退出,数据类型与表达式 答疑电话QQ: 994273380,Access数据库（第10章）,2009年,2,复习第二章 Access数据库的创建与管理,创建空数据库方法与步骤 使用向导创建数据库 表的建立：建立表结构（使用向导，使用表设计器，使用数据表） 设置字段属性，输入数据（直接输入数据，获取外部数据）,Access数据库（第10章）,2009年,3,复习第三章 Access数据表的建立与操作,表间关系的建立与修改：表间关系的概念（一对一，一对多），建立表间关系，设置参照完整性） 表的维护：修改表结构（添加字段，修改字段，删除字段，重新设置主关键字），编辑表内容（添加记录，修改记录，删除记录，复制记录），调整表外观。 表的其他操作： 查找数据，替换数据，排序记录，筛选记录。,Access数据库（第10章）,2009年,4,复习第四章 创建Access查询,查询分类：( 选择查询、 参数查询、交*表查询、操作查询、SQL查询） 查询准则：（运算符、函数、表达式） 创建查询：（使用向导创建查询、使用设计器创建查询、在查询中计算） 操作已创建的查询：（运行已创建的查询、编辑查询中的字段、编辑查询中的数据源、排序查询的结果）,Access数据库（第10章）,2009年,5,复习第五章 结构化查询语言SQL,SQL简介， SQL基本命令： 数据定义： CREATE 、ALTER、DROP 数据操作： INSERT、UPDATE、DELETE、 数据查询：SELECT,Access数据库（第10章）,2009年,6,复习第六章 Access的窗体设计,窗体分类： 纵栏式窗体、表格式窗体、主/子窗体、数据表窗体、图表窗体、数据透视表窗体 创建窗体： 使用向导创建窗体， 使用设计器创建窗体 控件的含义及种类，标签、文本框、列表组合框 在窗体中添加和修改控件 设置控件的常见属性：引用名、,Access数据库（第10章）,2009年,7,复习第七章 Access的报表设计,报表分类：纵栏式报表，表格式报表，图表报表，标签报表 使用向导创建报表 使用设计器编辑报表 在报表中计算和汇总,见讲稿：Access_10报表制作数据访问页,Access数据库（第10章）,2009年,8,复习第八章 创建数据访问页,数据访问页的概念 创建数据访问页：自动创建数据访问页，使用向导数据访问页,Access数据库（第10章）,2009年,9,复习第九章 创建宏,宏的基本概念 宏的基本操作：创建宏(创建一个宏，创建宏组), 运行宏,在宏中使用条件,设置宏操作参数,常用的宏操作,Access数据库（第10章）,2009年,10,复习第十章 VBA程序设计,模块的基本概念：类模块，标准模块，将宏转换为模块 创建模块：创建VBA模块（在模块中加入过程、在模块中执行宏），编写事件过程（键盘事件、鼠标事件、窗口事件、操作事件和其他事件） 调用和参数传递 VBA程序设计基础：面向对象程序设计的基本概念，VBA编程环境（进入VBE、VBE界面），VBA编程基础（常量、变量、表达式），VBA程序流程控制（顺序控制、选择控制、循环控制） VBA程序的调试：设置断点，单步跟踪，设置监视点,Access数据库（第10章）,2009年,11,Access各章比例及题型,Access数据库（第10章）,2009年,12,第15讲 VBA的过程调用,过程分类与过程调用:,格式1：(无参标准过程) Sub () End Sub 调用语句： Call ,说明： 可在子过程的语句序列中，用Call语句调用另一个子过程；子过程已定义的变量，可在另一个子过程中引用或修改。,Access数据库（第10章）,2009年,13,在过程中，用Dim 或 Static来声明的局部变量其作用域只限在本过程。两者不同之处在于用Dim语句声明的变量在退出过程时变量的值被清除，而用Static声明的变量其值在退出过程时还保持有效。这样，用Static声明的变量其值就可以一直保留。用Static声明的变量又称为静态变量。在过程中未声明就使用的变量默认为是过程级变量。 在模块的申明区，用Private来声明的局部变量其作用域只限在本模块。是模块级变量，用Public声明的变量其作用域为整个VB应用程序，是全局变量。,第15讲 变量作用域,变量作业域:,格式1：(静态变量定义) Static AS , 格式2：(静态变量定义) Dim AS , ,说明：,Access数据库（第10章）,2009年,14,Option Compare Database - Sub 过程调用() Dim x As Integer, y As Integer Static a As Integer, b x = x+8: a = a+4 Debug.Print “x=“; x; “ y=“; y, “a=“; a, ; “ b=“; b Call 子过程 MsgBox “x=“ c End Sub,x= 8 y= 0 a= 4 b= x= 8 y= 11 a= 1024 b= 6 c= 3,x= 8 y= 0 a= 8 b= x= 8 y= 11 a= 1024 b= 6 c= 3,再次运行，观察动态变量和静态变量的差别,Access数据库（第10章）,2009年,15,Option Compare Database - Sub 过程调用() Private x As Integer, y As Integer Static a As Integer, b x = x+8: a = a+4 Debug.Print “x=“; x; “ y=“; y, “a=“; a, ; “ b=“; b Call 子过程 MsgBox “x=“ c End Sub,Public,Access数据库（第10章）,2009年,16,Option Compare Database Dim x As Integer, y As Integer Static a As Integer, b - Sub 过程调用() x = x+8: a = a+4 Debug.Print “x=“; x; “ y=“; y, “a=“; a, ; “ b=“; b Call 子过程 MsgBox “x=“ c End Sub,Access数据库（第10章）,2009年,17,Option Compare Database Dim x As Integer, y As Integer Private a As Integer, b - Sub 过程调用() x = x+8: a = a+4 Debug.Print “x=“; x; “ y=“; y, “a=“; a, ; “ b=“; b Call 子过程 MsgBox “x=“ c End Sub,x= 8 y= 0 a= 4 b= x= 8 y= 0 a= 4 b=c= x= 16 y= 11 a= 1028 b= 6 c= 3,Access数据库（第10章）,2009年,18,第15讲 VBA的过程调用_形参与实参,过程分类与过程调用:,格式1：(无参标准过程) Sub () End Sub 调用语句： Call ,说明： 可在子过程的语句序列中，用Call语句调用另一个子过程；子过程已定义的变量，可在另一个子过程中引用或修改。,格式1：(有参标准过程) Sub () End Sub 调用语句： Call (),说明：在子过程的语句序列中，用Call语句调用另一个子过程时；实参必须和形参个数相同，类型相同；有按位置传递和按值传递两种方式。,Access数据库（第10章）,2009年,19,按值传递参数：按值传递参数指的是形参与实参占用不同的内存单元，是两个不同的变量。这种传递方法是实参将其值赋给形参，形参的变化不会影响到实参的值。要按值传递，必须在形参前加ByVal关键字。,第15讲 VBA的过程调用中的参数传递,按地址传递参数：按地址传递参数的方式无论实参与形参的名字是否相同，在内存中它们都占用相同的存储单元。当子过程的形参值发生变化时，主过程中的实参值也发生相应的变化。要显式地指定是按地址传递，可在形参前加ByRef关键字。VBA中默认的参数传递方式是按地址传递，所以这个ByRef也可以省略。,Access数据库（第10章）,2009年,20,Dim a As Integer Option Explicit Sub area() Dim x As Integer, y As Integer, z As Integer x = 10: y = 10 Call calcu(x, y, z) Debug.Print x & “*“ & y & “=“ & z End Sub Sub calcu(ByRef a As Integer, b As Integer, c As Integer) c = a * b End Sub,立即窗口运行结果： 10*10=100,Access数据库（第10章）,2009年,21,Sub first() Dim x As Integer, y As Integer x = 10: y = 20 Debug.Print “调用second(x, y)前：“ & “x=“ & x & “ y=“ & y Call second(x, y) Debug.Print “调用second(x, y)后：“ & “x=“ & x & “ y=“ & y End Sub Sub second(ByVal a As Integer, ByVal b As Integer) Debug.Print “second(x, y)函数中，A,B赋值前：“ & “a=“ & a & “ b=“ & b a = 33: b = 44 Debug.Print “second(x, y)函数中，A,B赋值后：“ & “a=“ & a & “ b=“ & b End Sub,立即窗口运行结果： 调用second(x, y)前：x=10 y=20 second(x, y)函数中，A,B赋值前：a=10 b=20 second(x, y)函数中，A,B赋值后：a=33 b=44 调用second(x, y)后：x=10 y=20,Access数据库（第10章）,2009年,22,第13讲 Access数据库的模块设计,面向对象的程序设计:,对象(Object)：对象是一些相关的变量和方法的软件集合。在程序设计中需要处理的事物均可以看成一个对象。是一种将数据和操作过程结合在一起的数据结构。是应用程序的基本元素。例：我们创建的窗体或窗体上的任何一个具体控件。,类(Class)：类是具有共同属性、共同行为的对象的集合。它是对客观对象的抽象和归纳。因此，类又可以认为是定义同一类所有对象的变量和方法的集合。例如，命令按钮、文本框、组合框等。,Access数据库（第10章）,2009年,23,第13讲 Access数据库的模块设计,面向对象的程序设计:,属性(Property)：属性是对象具有的物理性质及特征的描述。通过对属性的设置，可以设置对象的外观和某方面的状态。在Access中，窗体、报表、和控件等都是对象，而窗体的大小、控件的位置等都是对象的属性。为了使所编的软件在运行的时候各种界面看起来更美观，我们必须在设计软件时对每个对象的有关属性做适当的设置。所谓“有关“，就是对于一个对象来说，在一个软件中只有部分与这个软件有关的属性需要设置，而大部分可能不需要设置，只需使用它们隐含的设置就行了，而同一个对象在另一个地方可能需要设置的属性就又不同了。 对于属性的设置，有些只需用鼠标做适当的拖动即可，如长、宽、放的位置等，当然它们也可以在属性窗口中设置，另一些则必须在属性窗口中进行设置，如字体、颜色、标题等。而有些就只能在程序中设置。,Access数据库（第10章）,2009年,24,第13讲 Access数据库的模块设计,面向对象的程序设计:,方法(Method)：也叫“方法程序”。它描述了对象的行为。对象的方法就是指对象完成某种任务所执行的操作。这些方法可以在我们需要的时候调用。 在VBA中，调用属性和方法的格式如下： . .（,.）,Access数据库（第10章）,2009年,25,对象引用方式,表10-11 “！”的引用示例,Access数据库（第10章）,2009年,26,第13讲 Access数据库的模块设计,面向对象的程序设计:,事件(Event):事件就是可能会发生在对象上的事情， 也可以说我们对对象所做的操作(或者系统对某个对象的操作)。它是Access预先定义好的能够被对象识别的动作。 如单击鼠标(Click)事件、双击鼠标(DblClick)事件、移动鼠标(MouseMove)事件、加载(Load)事件等等。,事件过程：为了使得对象在某一事件发生时能够做出所需要的反应，我们就必须针对这一事件编出相应的程序代码来完成这一目标。如果一个对象的某个事件被编写了相应的代码，当这一事件发生时（如按钮被按动），相应的程序段就被激活，并开始执行，如这一事件不发生，则这段程序就不会运行。为这个事件而编写的代码就称为事件过程。而对于没有编写事件过程的事件，即使发生也不会有任何反应。,Access数据库（第10章）,2009年,27,第13讲 Access数据库的模块设计,面向对象的程序设计:,Access中的对象：我们已学过了表、查询、窗体、报表、数据访问页、宏和模块；其中,在窗体、报表、数据访问页中创建的控件也是Access的对象； 此外，Access 中还有许多其它对象可用于您的 Access 应用程序中，其中最重要的是 DoCmd 、CurrentProject、CurrentData、CodeProject、CodeData和Screen 等对象；它们的主要功能就是：通过调用包含在其内部的方法，实现在VBA编程中对Access数据库的操作；下面重点介绍DoCmd对象及其它对象的学习方法。,Access数据库（第10章）,2009年,28,第13讲 Access数据库的模块设计,面向对象的程序设计:,DoCmd对象：学习方法；按Crtl+F11进入VBA窗口，选【视图】菜单下的【对象浏览器】打开对象浏览器窗口：,1,2,3,4,5,Access数据库（第10章）,2009年,29,第13讲 Access数据库的模块设计,面向对象的程序设计:,DoCmd.OpenForm 方法,DoCmd.OpenForm(FormName, View, FilterName, WhereCondition, DataMode, WindowMode, OpenArgs),DoCmd.OpenForm(, , , ,),acNormal acDesign acPreview acFormDS acFormPivotTablea acFormPivotChart,Access数据库（第10章）,2009年,30,第13讲 Access数据库的模块设计,面向对象的程序设计:,OpenForm 方法帮助信息,DoCmd.OpenForm(, , , ,), acFormAdd 用户可以添加新记录，但是不能编辑现有记录 acFormEdit 用户可以编辑现有记录和添加新记录 acFormPropertySettings 默认 acFormReadOnly 用户只能查看记录,Access数据库（第10章）,2009年,31,第13讲 Access数据库的模块设计,面向对象的程序设计:,OpenForm 方法帮助信息,DoCmd.OpenForm(, , , ,), acDialog: 窗体的 Modal 和 Po