第09章Access窗体及其应用

第9章 VBA编程 编程
知识要点
【本章要点】 通过本章的学习，可以了解到什么是VBA，并掌握 1、理解 VBA 概念 Access 2003的VBA编程环境VBE的操作，学会使用基 础VBA语法，并用它来编写短小实用的模块，帮助我们 2、掌握 VBA 编程环境 VBE的操作 更方便有效的使用Access。 3、使用基础 VBA 语法
VBE窗口可大体分为如图9-3中所标的六部分： （1）菜单栏：VBE中所有的功能都可以在菜单栏中实现。 （2）帮助搜索：在图9-3中标号为2的位置，可以输入你所要查询的知识点，就 会激活Visual Basic帮助，如图9-4中，就是在搜索栏中输入“属性”，按回 车后，激活了Visual Basic帮助窗口，并把搜索到的相关条目列出，你再点击 感兴趣的条目，就会打开Miscrosoft Visual Basic帮助文档，示条目的具体内 容。
图9-4 帮助搜索和帮助文档
（3）工具栏：工具栏中包含各种快捷工具按钮，根据功能类型的不同各属于不同 分组。比如：和代码编辑相关的工具按钮就属于“编辑”工具，和调试相关的工具 按钮属于“调试”工具。 （4）工程资源管理器：用来显示和管理当前数据库中包含的工程。刚打开VBE时， 会自动产生一个与当前Access数据库同名的空工程，可以在其中插入模块。一个数 据库可以对应多个工程，一个工程可以包含多个模块。 工程资源管理器窗口标题下面有三个按钮，分别为：“查看代码” ，显示代码 窗口，以编写或编辑所选工程目标代码；“查看对象” ，显示选取的工程，可以 是文档或是 UserForm 的对象窗口；“切换文件夹” ，当正在显示包含在对象 文件夹中的个别工程时可以隐藏或显示它们。 （5）属性窗口：用来显示所选定对象的属性，同时可以更改对象的属性。 “对象下拉列表框”是用来列出当前所选的对象，只能列出现用窗体中的对象。如 果选取了好几个对象，则以第一个对象为准。 “属性列表”： “按字母序”选项卡— 按字母顺序列出所选对象的所有属性。 “按分类序”选项卡— 根据性质列出所选对象的所有属性。可以折叠这个列表， 这样将只看到分类；也可以扩充一个分类，并可以看到其所有的属性。当扩充或折 叠列表时，可在分类名称的左边看到一个加号 （+）或减号（-）图标。

3
在“报表页 眉”节中添 加一个文本 框。在标签 框中输入 “各地区客 户”，字体 设为12号粗 斜体，在文 本框中输入 “=Now()”
5
双击报表属性按钮，弹 出“报表”属性窗口
4
在“页面页脚”节中创建另 一个文本框，将其对应的标 签删除，在文本框中输入 “="第 " & [Page] & " 页"”
第9章 创建实用Access数据库
公司客户管理系统 进销存管理系统
9.1 公司客户管理系统
• 9.1.1 创建“公司客户管理系统”数据表
作为一个销售型的公司，或者对于某个工厂的销售 部门来说，公司客户管理系统的建立可以有效的避 免因业务员个人工作变动而造成公司客户的流失， 也可以方便我们统计每个业务员的销售业绩，以及 各个地区间的销售差异。 1、创建基础表 根据公司情况，建立公司客户管理系统共需5个表， 如下页图所示。
4
以相同的操 作，按照书 中表9-1的规 定设置“联 系人性别”、 “邮政编 码”、“公 司规模”和 “加入时间” 的“常规” 属性。设置 完毕后将此 窗口关闭， 并选择保存 为“客户信 息表”后， 即可完成此 表的创建
5
创建了“客户 信息表”后， 按照相同的操 作步骤，创建 其它表 在表设计器窗 口中，选中 “公司名称” 字段，在下边 的常规选项卡 中设置格式 为：！“公司 名称：”&[蓝 色]，将索引设 置为：有（无 重复）
在对象列表中选择“Command90”，在事 件过程列表中选择“Click”事件
11
在对象列表中选择“Command91”， 在事件过程列表中选择“Click”事件
12
为“保存修 改”按钮 （Command 91）的单击 （Click）事 件编写如下 代码

2016/7/12
9.3 VBA程序设计基础
Visual Basic是微软公司推出的可视化应用程序开 发语言，简称VB。由于VB功能强大且编程简单易 学，因此微软公司将它的一部分代码结合到office 中，形成了VBA。VBA语法与Visual Basic 编程 语言互相兼容。在Access 程序设计中，当某些操 作不能用其他Access 对象实现，或者实现起来很 困难时，就可以利用VBA语言编写代码，完成这 些复杂任务。
2016/7/12
1、赋值语句 赋值语句可以将常量或常量表达式的值赋给变量 或对象的属性，一般格式为： <变量名>=<表达式> 或 [<对象名>.]<属性名>=<表达式> （1） <变量名>应符合变量的命名规则，<对象名> 缺少时为当前窗体或报表。 （2） 首先计算“=”（赋值运算符）右边表达式的 值，将此值赋给“=”左边的变量或对象属性。
2016/7/12
例9．1 创建一个名为Welcome的模块，其功能是 用来显示欢迎消息框。 操作步骤： （1）选择数据库窗口中的“模块”对象，单击 “新建”按钮，打开VBA编辑界面。 （2）执行“插入”｜“过程”菜单命令。在弹出 的“添加过程”对话框中填写过程的名称、选择 过程类型和范围，单击“确定”按钮后，出现 Welcome过程的编写窗口。
2016/7/12
4．MsgBox函数和MsgBox语句 MsgBox函数或语句可以产生一个消息框，消息框中给出 提示信息，用户可以根据提示信息选择后面的操作。 函数格式为： MsgBox（消息字符串[，按钮与图标样式][，对话框标题 字符串]） 语句格式为： MsgBox 消息字符串[，按钮与图标样式][，对话框标题字 符串] 两种格式的区别是，MsgBox函数会产生一个返回值，用 户需要将返回值赋给一个变量。MsgBox语句无返回值， 仅是单纯的信息显示。

9.3 设计数据库

在进行数据库应用系统开发时，一定要设 计好数据库，设计好数据库中应有的数据 表和数据表之间的关系、数据表的结构， 然后再设计由数据表生成的查询，设计窗 体和报表，以及使用宏和VBA对成绩管理 系统的开发。 数据库应用系统的数据量越大，数据的来 源越复杂，数据库设计的好坏就越显得重 要，它将影响着整个系统的设计过程。

9.1 9.2
数据库应用系统设计流程 需求分析及主要功能模块 设计数据库
9.3
9.4 9.5 9.6 9.7
建立操作界面
创建成绩管理系统报表
实现学生成绩管理系统
维护学生成绩管理系统
9.1 数据库应用系统设计流程

数据库应用系统的开发设计过程一般 采用生命周期理论。生命周期理论是应 用系统从提出需求、形成概念开始，经 过分析论证、系统开发、使用维护，直 到淘汰或被新的应用系统所取代的一个 全过程。其设计过程可以分为6个阶段： 需求分析、概念设计、逻辑设计、物理 设计、数据库实施和运行、数据库的使 用和维护。

结合Access自身的特点，使用Access开发 一个数据库应用系统，其系统设计步骤如下： 1. 首先用户提出要求； 2. 初步调查，了解情况，进行可行性分析； 3. 设计数据库，建立系统功能模块结构图； 4. 设计数据输入界面，如窗体、数据访问页等； 5. 设计数据输出界面，如报表、查询界面等；
统计汇总报表是在设计报表时，对报表的数据源 进行统计分析，使报表输出的数据不仅是数据源 中原有的内容，同时还有统计结果。学生成绩汇 总报表，如图9-10所示。
图9-10 学生成绩汇总报表
9.6 实现学生成绩管理系统

学生成绩管理系统的功能包括：学生 信息和教师信息的录入、浏览、更新、 查询和打印。该系统的基本流程是启动 “学生成绩管理系统”时，首先打开 “系统登录”窗体，要求输入用户密码， 若密码正确，系统打开“主界面”窗体。 “主界面板”窗体包含控制整个数据库 的各项功能。