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=cEnd 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=cEnd Sub,Public,Access数据库（第10章）,2009年,16,Option Compare DatabaseDim x As Integer,y As IntegerStatic a As Integer,b-Sub 过程调用()x=x+8:a=a+4 Debug.Print x=;x;y=;y,a=;a,;b=;b Call 子过程 MsgBox x=cEnd Sub,Access数据库（第10章）,2009年,17,Option Compare DatabaseDim x As Integer,y As IntegerPrivate a As Integer,b-Sub 过程调用()x=x+8:a=a+4 Debug.Print x=;x;y=;y,a=;a,;b=;b Call 子过程 MsgBox x=cEnd 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 IntegerOption ExplicitSub area()Dim x As Integer,y As Integer,z As Integer x=10:y=10 Call calcu(x,y,z)Debug.Print x&*&y&=&zEnd SubSub calcu(ByRef a As Integer,b As Integer,c As Integer)c=a*bEnd 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=&yEnd SubSub 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=&bEnd Sub,立即窗口运行结果：调用second(x,y)前：x=10 y=20second(x,y)函数中，A,B赋值前：a=10 b=20second(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(,),acNormalacDesignacPreviewacFormDSacFormPivotTableaacFormPivotChart,Access数据库（第10章）,2009年,30,第13讲 Access数据库的模块设计,面向对象的程序设计:,OpenForm 方法帮助信息,DoCmd.OpenForm(,),acFormAdd 用户可以添加新记录，但是不能编辑现有记录acFormEdit 用户可以编辑现有记录和添加新记录acFormPropertySettings 默认acFormReadOnly 用户只能查看记录,Access数据库（第10章）,2009年,31,第13讲 Access数据库的模块设计,面向对象的程序设计:,OpenForm 方法帮助信息,DoCmd.OpenForm(,),acDialog:窗体的 Modal 和 PopUp 属性设为“是”。acHidden:窗体隐藏。acIcon:打开窗体并在 Windows 工具栏中最小化。acWindowNormal:默认值 窗体采用它的属性所设置的模式,Access数据库（第10章）,2009年,32,第13讲 Access数据库的模块设计,面向对象的程序设计:,GoToRecord方法格式：DoCmd.GoToRecord(ObjectType,ObjectName,Record,Offset)DoCmd.GoToRecord(,Offset),ObjectType：可选项。可以是下面的数据对象类型:acActiveDataObject 默认活动对象(获得焦点：当前正在使用 的控件)acDataForm 窗体acDataFunction 函数(控件)acDataQuery 查询acDataTable 表,Access数据库（第10章）,2009年,33,第13讲 Access数据库的模块设计,面向对象的程序设计:,OpenForm 方法帮助信息,参阅应用于示例特性 在 Visual Basic 中，OpenForm 方法执行 OpenForm 操作expression.OpenForm(FormName,View,FilterName,WhereCondition,DataMode,WindowMode,OpenArgs)expression 必需。返回“应用于”列表中的一个对象的表达式。,Access数据库（第10章）,2009年,34,面向对象程序设计例：,面向对象程序设计例：见教材【例10-19】写程序运行结果：见教材10章习题：二.编程序：不要求能编程序，但参考答案：能读懂,