Access使用宏控制程序

　2006-08-07 00:00:00　来源：WEB开发网　　　

核心提示：1.创建宏因为宏是在控件发生事件的时候执行的，所以我们需要先创建对象，Access使用宏控制程序，然后让它的相应的事件指向某个宏，建立一个窗体，如果拖拽的是某个宏，将添加执行此宏的操作，在上面添加一个按钮（如果出现按钮向导的对话框，单击取消）

1.创建宏

因为宏是在控件发生事件的时候执行的，所以我们需要先创建对象，然后让它的相应的事件指向某个宏。

建立一个窗体，在上面添加一个按钮（如果出现按钮向导的对话框，单击取消）。

在属性窗口中选择事件/单击右边的生成器按钮，从中选择“宏生成器”，然后给宏起一个名字，比如“宏1”。

在操作列选择“OpenForm”，下面参数中的“窗体名称”选择“窗体1”（当然，在这之前你需要有一个叫做窗体1的窗体）。

关闭宏的设计视图，保存宏。

这是刚建的按钮的属性窗口，可以看到，单击事件已经指向的宏1。

运行该窗体，当单击按钮时，将打开窗体1。

2.创建宏组

如果有许许多多的宏，那么将相关的宏分组到不同的宏组可以有助于方便地对数据库进行管理。

建立一个窗体，添加4个按钮（如果出现按钮向导对话框，选择取消）。

按照创建宏的方法，打开宏设计视图，单击工具栏上的“宏名”按钮，为宏添加宏名列。

为4个按钮各起一个宏名，并选择一个宏操作。

关闭宏设计视图，保存宏。

“宏名”列用于标识宏。在宏组中执行宏时，Microsoft Access 将执行操作列中的操作和操作列中其“宏名”列为空时立即跟随的操作。

为了在宏组中执行宏，可以使用这样的格式调用宏：宏组名+“句点”+宏名。

在按钮属性窗口的事件/单击的下拉列表框中选择合适的宏名。

运行窗体，单击各按钮后会执行宏组中相应的宏。

3.在宏中使用条件

在某些情况下，可能希望仅当特定条件为真时才在宏中执行一个或多个操作。例如，如果在某个窗体中使用宏来校验数据，可能要显示相应的信息来响应记录的某些输入值，另一信息来响应另一些不同的值。在这种情况下，可以使用条件来控制宏的流程。

条件是逻辑表达式。宏将根据条件结果的真或假而沿着不同的路径执行。如果这个条件结果为真，则 Microsoft Access 将执行此行中的操作。在紧跟此操作的操作的“条件”栏内键入省略号（…），就可以使 Microsoft Access 在条件为真时可以执行这些操作；如果这个条件式的结果为假，Microsoft Access 则会忽略这个操作以及紧接着此操作且在“条件”字段内有省略号（…）的操作，并且移到下一个包含其他条件或空“条件”字段的操作。　

建立一个窗体，添加一个文本框，命名为“输入数字文本框”，再添加一个确定按钮。

单击确定按钮属性的事件/单击右边的生成器按钮，选择建立宏，并为宏起一个宏名，如“宏3”。

上图是宏3的设计视图。这个宏将实现根据用户在[输入数字文本框]中输入的不同数字显示不同的消息。

单击工具栏上的“条件”按钮，为宏添加条件列。

图中第一行表示当 0 < [输入数字文本框] < 10 时，显示一个“你输入了一个小于 10 的数字”的消息。

第二行表示当 10 < [输入数字文本框] < 20 时时，显示一个“你输入了一个大于 10 并小于 20 的数字”的消息。

第三行表示当 20 < [输入数字文本框] < 30 时时，显示一个“你输入了一个小于 20 并小于 30 的数字”的消息。

关闭宏的设计视图，保存宏3。

这是窗体运行时的效果，当输入了一个数字 15 ，将显示如图的消息框。

4.常用的宏操作

宏的操作是非常丰富的，如果你只是做一个小型的数据库，程序的流程用宏就可以完全实现，而无须使用 Visual Basic 。

有的操作是没有参数的（如 Beep ），而有的操作必须指定参数才行（如 OpenForm ）。通常，按参数排列顺序来设置操作的参数是很好的方法，因为选择某一参数将决定该参数后面的参数的选择。

常用宏操作

操作	说明
Beep	通过计算机的扬声器发出嘟嘟声。
Close	关闭指定的 Microsoft Access 窗口。如果没有指定窗口，则关闭活动窗口。
GoToControl	把焦点移到打开的窗体、窗体数据表、表数据表、查询数据表中当前记录的特定字段或控件上。
Maximize	放大活动窗口，使其充满 Microsoft Access 窗口。该操作可以使用户尽可能多地看到活动窗口中的对象。
Minimize	将活动窗口缩小为 Microsoft Access 窗口底部的小标题栏。
MsgBox	显示包含警告信息或其它信息的消息框。
OpenForm	打开一个窗体，并通过选择窗体的数据输入与窗口方式，来限制窗体所显示的记录。
OpenReport	在“设计”视图或打印预览中打开报表或立即打印报表。也可以限制需要在报表中打印的记录。
PrintOut	打印打开数据库中的活动对象，也可以打印数据表、报表、窗体和模块。
Quit	退出 Microsoft Access 。Quit 操作还可以指定在退出 Access 之前是否保存数据库对象。
RepaintObject	完成指定数据库对象的屏幕更新。如果没有指定数据库对象，则对活动数据库对象进行更新。更新包括对象的所有控件的所有重新计算。
Restore	将处于最大化或最小化的窗口恢复为原来的大小。
RunMacro	运行宏。该宏可以在宏组中。
SetValue	对 Microsoft Access 窗体、窗体数据表或报表上的字段、控件或属性的值进行设置。
StopMacro	停止当前正在运行的宏。

5.一个宏的实例——检验口令

在这个实例中将创建一个将包含条件的宏组，用来实现对口令的检验，如果口令正确，就先关闭这个身份核对窗口，再打开另一个窗体；如果口令不正确，将出现信息框要求重新输入口令。

建立一个窗体，添加文本框，命名为“管理员口令”，用来接收用户输入的口令。再建立一个确定按钮和一个取消按钮。

为按钮建立一个宏组，宏的设计视图如上图。

“条件”栏内的省略号（…），表示条件为真时可以连续第执行这些操作。

这是窗体运行的效果。

当输入的口令不正确时，单击确定按钮将出现一个“口令不正确”的消息框。

在这个例子中，管理员口令被定义为“ system ”，这在实际的应用中是不可行的，因为口令会因为需要而随时更改。为了实现这样的功能，你可以先建一个用户表，里面保存了用户的口令，在宏中用用户输入的口令和用户表中的口令比较。如果要更改口令，更改表的数据就行了。

6.使用宏的几点说明

宏操作的说明不是必选的，但可以使宏更易于理解和维护。

在宏“条件”列不能使用 SQL 表达式。

通常情况下直接执行宏只是进行测试。可以在确保宏的设计无误之后，将宏附加到窗体、报表或控件中，以对事件做出响应，也可以创建一个执行宏的自定义菜单命令。
如果要 Microsoft Access 暂时忽略某个操作，请输入 False 为条件。暂时忽略操作有助于找出宏中的问题。

如果要快速创建一个在指定数据库对象上执行操作的宏，请从“数据库”窗口中将对象拖拽到“宏”窗口的操作行。例如，将窗体拖拽到操作行，就可以创建一个打开窗体的宏。其步骤如下：单击“窗口”菜单上的“垂直平铺”命令来放置“宏”窗口和“数据库”窗口，以使得两者都能显示在屏幕上；然后在“数据库”窗口中单击要拖拽的对象类型的选项卡，单击相应的对象，并将其拖拽到某个操作行内。如果拖拽的是某个宏，将添加执行此宏的操作，而拖拽其他对象（表、查询、窗体、报表或模块）将添加打开相应对象的操作。