access编程-操作（宏）[5]

来源:www.accessoft.com 点击数:7464 　 | 收藏 | 复制

时　间:2009-03-19 08:39:38
作　者:UMVsoft资料 ID：11 城市：上海 QQ：3002789054
摘　要:Access编程-操作（宏）
正　文:

Echo 操作[5]

使用 Echo 操作可以指定是否打开回响。例如，可以使用该操作在宏运行时隐藏或显示运行结果。

Echo 操作具有下列参数：

操作参数	说明
打开回响	在“宏”窗口“操作参数”部分的“打开回响”框中，单击“是”（打开回响）或“否”（关闭回响）。默认值为“是”。
状态栏文字	关闭回响时在状态栏中显示的文字。例如，在关闭回响时，状态栏可以显示“宏正在运行”。

说明：当 Microsoft Access 执行宏时，屏幕更新通常显示不是宏功能所必需的信息。如果将“打开回响”参数设置为“否”，则宏运行时将不会更新屏幕。当宏完成时，Microsoft Access 会自动打开回响，并重画窗口。“打开回响”参数的“否”设置并不影响宏或其运行结果。

Echo 操作不会禁止模式对话框（如错误消息）或弹出式窗体（如属性表）的显示。即使关闭了回响，仍可以用模式对话框或弹出式窗体来收集或显示信息。若要关闭所有消息框或对话框（除错误消息框和要求用户输入信息的对话框外），请使用 SetWarnings 操作。

在同一个宏中可以多次运行 Echo 操作。这样就能够在宏运行时改变状态栏文字。

如果要关闭回响，可以使用 Hourglass 操作，将鼠标指针改变成沙漏图标（或者为 Microsoft Window 2000、Microsoft Windows Millennium Edition、Microsoft Window 98 中的“忙”或 Microsoft Window NT 中的“等待”状态而设置的其他鼠标指针图标），以表明宏正在运行。

若要在 Visual Basic 中运行 Echo 操作，可使用 DoCmd 对象的 Echo 方法。

示例：通过使用宏设置控件的值 - 示例

下面的宏使用“供应商”窗体中的一个按钮打开“增加产品”窗体。它显示了 Echo、Close、OpenForm、SetValue 及 GoToControl 操作的使用方法。SetValue 操作将“产品”窗体中的“供应商ID”控件设置为“供应商”窗体中的当前供应商，然后 GoToControl 操作将焦点移到“类别ID”字段，以便输入新产品的数据。该宏应附加到“供应商”窗体的“添加产品”按钮上。

操作	参数：设置	备注
Echo	打开回响：否	在宏执行当中停止屏幕更新。
Close	*对象类型：窗体对象名称：产品列表保存：*否	关闭“产品列表”窗体。
OpenForm	*窗体名称：产品视图：窗体数据模式：添加窗口模式：*普通	打开“产品”窗体。
SetValue	*项目：[Forms]![产品]![供应商ID] 表达式：*供应商ID	将“供应商ID”控件设为“供应商”窗体中的当前供应商。
GoToControl	控件名称：类别ID	移到“类别ID”控件。

通过使用宏同步窗体

下面的宏会在“供应商”窗体的右下角打开一个“产品列表”窗体，显示当前供应商所供应的产品。它显示了 Echo、MsgBox、GoToControl、StopMacro、OpenForm 及 MoveSize 等操作的使用方法，同时也显示了 MsgBox、GoToControl 和 StopMacro 操作的条件表达式的使用方法。该宏应附加到“供应商”窗体的“回顾产品”按钮上。

条件	操作	参数：设置	备注
	Echo	打开回响：否	在宏执行过程中停止屏幕更新。
IsNull([供应商ID])	MsgBox	*消息：请移至要查看其产品的供应商记录上，然后再次单击“回顾产品”按钮。发嘟嘟声：无类型：无标题：*选择供应商	如果“供应商”窗体中没有当前供应商的数据，则显示一条信息。
	GoToControl	*控件名称：*公司名称	将焦点移到“公司名称”控件上。
...	StopMacro		停止执行宏。
	OpenForm	*窗体名称：产品列表视图：数据表筛选名称：* Where *条件：[供应商ID] = [Forms]![供应商]![供应商ID] 数据模式：只读窗口模式：*普通	打开“产品列表”窗体并显示当前供应商的产品。
	MoveSize	右：0.7799 英寸下：1.8 英寸	将“产品列表”窗体放在“供应商”窗体的右下方。

FindNext 操作

使用 FindNext 操作可以查找下一个、符合前一个 FindRecord 操作或“在字段中查找”对话框中指定条件的记录（通过单击“编辑”菜单中的“查找”可以打开“在字段中查找”对话框）。使用 FindNext 操作可以反复搜索记录。例如，可以在某一特定客户的所有记录间进行连续移动。

设置

FindNext 操作没任何参数。FindNext 操作查找下一个、符合由 FindRecord 操作或“在字段中查找”对话框中所设条件的记录。FindRecord 操作的参数与“在字段中查找”对话框中的选项共享。

若要设置搜索条件，请使用 FindRecord 操作。通常，可以在宏中输入 FindRecord 操作，然后使用 FindNext 操作，连续地查找符合相同条件的记录。如果只搜索符合某一特定条件的记录，可以在 FindNext 操作对应的操作行上“条件”列中输入一个条件表达式。

说明该操作与使用“在字段中查找”对话框中的“查找下一个”按钮具有相同的作用。

注意虽然 FindRecord 操作可以对应于表、查询和窗体的“编辑”菜单上的“查找”命令，但是不对应于“代码”窗口的“编辑”菜单上的“查找”命令。不能用 FindRecord 操作或 FindNext 操作来搜索模块中的文本。

提示如果已经将 FindRecord 操作的“只搜索当前字段”参数设置为“是”，则可能需要在使用 FindNext 操作之前先通过 GoToControl 操作将焦点移到包含要搜索数据的控件上。

如果在执行 FindNext 宏操作时当前选取的文本与搜索文本相同，那么搜索会紧接所选内容之后在同一字段、同一记录中开始。否则搜索会从当前记录的开头开始。这样可以在单个记录中查找符合相同搜索条件的多个实例。

不过，请注意，如果使用命令按钮执行包含 FindNext 操作的宏，系统便会重复地查找符合搜索条件的第一个实例。之所以发生这种情况，是因为单击命令按钮时，会从包含匹配值的字段中删除焦点。然后 FindNext 操作将从记录的开头进行搜索。若想避免这种问题，可使用不改变焦点的技术执行宏（这类技术包括自定义工具栏按钮或 AutoKeys 宏定义的组合键）。也可以在执行 FindNext 操作之前，先在宏中将焦点设置到包含搜索条件的字段中。如果使用命令按钮执行包含 FindRecord 操作的宏，并将“从第一条查找”参数设置为“否”，也会发生同样的情况。