模块与vba程序设计

《模块与vba程序设计》由会员上传分享，免费在线阅读，更多相关内容在教育资源-天天文库。

1、第十章模块与VBA程序设计二级ACCESS—模块与VBA10.1模块和过程的创建模块是Access数据库7个对象之一，其实质就是没有界面的VBA程序。模块具有很强的通用性，窗体、报表等对象都可以调用模块内部的过程。模块基本上是由声明、语句和过程组成的集合，它们作为一个已命名的单元存储在一起，对VBA代码进行组织。Access有两种类型的模块：标准模块和类模块。二级ACCESS—模块与VBA10.1模块和过程的创建类模块包括窗体模块(模块中包含在指定的窗体或其控件上事件发生时触发的事件过程的代码。)和报表模块(模块中包含由在指定报表或其控件上发生的事件触发的事件过程的代码。)，

2、它们各自与某一特定窗体或报表相关联。类模块可以调用标准模块中定义好的过程作用范围限于所属窗体或报表内部，生命期也随窗体或报表的打开而开始、关闭而结束二级ACCESS—模块与VBA10.1模块和过程的创建标准模块标准模块包含的是通用过程和常用过程，这些通用过程不与任何对象相关联，常用过程可以在数据库中的任何位置运行。类模块可以调用标准模块中定义好的过程标准模块中的公共变量和公共过程具有全局特性，作用范围在整个应用程序，生命期伴着应用程序运行而开始、关闭而结束二级ACCESS—模块与VBA10.1模块和过程的创建模块的基本组成单元—过程Sub子过程可执行一系列操作，无返回值可在该

3、子过程之外用CALL显示调用调用Callmysub(参数1，参数2，…)Function函数执行一系列操作，返回执行结果返回值直接利用函数名调用获得调用x=myFuntion(参数)Submysub(参数1，参数2，…)变量声明部分操作语句部分EndSubFunctionmyFunction(参数)变量声明部分操作语句部分EndFunction二级ACCESS—模块与VBA10.1模块和过程的创建模块的创建创建一个名为“模块入门”的新模块保存为“模块入门”二级ACCESS—模块与VBA10.1模块和过程的创建过程的创建在“模块入门”模块中创建一个Hello过程用户输入执行过程

4、双击二级ACCESS—模块与VBA10.2VBA编程环境：VBE界面工程窗口属性窗口代码窗口立即窗口对象选定器过程选定器二级ACCESS—模块与VBA10.2VBA编程环境：VBE界面ACCESS视图运行子过程/用户窗体中断重新设定工程管理器插入模块属性窗口对象浏览器显示出对象库以及工程里过程中的可用类、属性、方法、事件及常数变量。可以用它来搜索及使用既有的对象，或是来源于其他应用程序的对象。二级ACCESS—模块与VBA10.2VBA编程环境：如何进入VBE进入VBE的基本方法在数据库窗口单击“工具”→“宏”→“VisualBasic编辑器”双击要查看或编辑的模块对象新建一

5、个模块对象对窗体和报表，在设计视图中点击“代码”按钮对窗体和报表，在设计视图中，点击某一控件的“事件属性”二级ACCESS—模块与VBAVBA程序设计一门程序设计语言应该怎么学?掌握语言的基本用途掌握语言的基本构成掌握语言的基本书写规范掌握语言的数据类型、运算符、常用函数、基本语句结构、调用关系。利用上述元素编写程序代码，逐步深化二级ACCESS—模块与VBA10.3面向对象编程基本概念一、对象与类对象：对象是基本的运行时的实体，如窗体、报表、各种控件等，包括作用于对象的操作（方法）和对象的响应（事件）。将数据和处理这些数据的过程封装在一起。类：一个抽象的整体概念，对象是类的

6、实例化。类与对象是面向对象程序设计语言的基础。例：“学生”→类，“张三”→对象二级ACCESS—模块与VBA10.3面向对象编程基本概念二、属性（Property）所有对象都有自己的属性。用来描述和反映对象特征的参数。如：控件名称(Name)、标题(Caption)、颜色(Color)、字体(FontName)等属性决定了对象展现给用户的界面具有什么样的外观及功能。对象属性设置的方法：在设计模式下，通过属性窗口直接设置对象的属性。在程序的代码中通过赋值实现，其格式为：对象.属性=属性值例：Label10.Caption=“显示”二级ACCESS—模块与VBA10.3面向对象编

7、程基本概念在VBA中引用ACCESS对象：基本语法：Forms(或Reports)!窗体(或报表)名称!控件名称[.属性名]注意要点如果在通用模块或在一类模块中引用另一类模块的控件时，应该使用上述完整语法。如果在类模块中引用自己窗体上的控件，仅采用下面语法：控件名称[.属性名]例如：在窗体Form1中引用Form2上的Label1控件Forms!Form2!Label1.Caption=“教师信息表”在引用Form2上引用自己的Label1控件Label1.Caption=“教师信息表二级ACCESS—