Access编程-操作（宏）[6]

FindRecord 操作[6]

使用 FindRecord 操作，可以查找符合 FindRecord 参数指定条件的数据的第一个实例。该数据可能是在当前的记录中，在之前或之后的记录中，也可以是在第一个记录中。可以在活动的表数据表、查询数据表、窗体数据表或窗体中查找记录。

FindRecord 操作具有下列参数：

说明    当某个宏运行 FindRecord 操作时，Access 将在记录中搜索指定数据（搜索的顺序由“搜索”参数的设置决定）。当 Access 查找到指定的数据时，该数据会在记录中被选定。

FindRecord 操作与单击“编辑”菜单中的“查找”命令具有相同的作用，而且其参数与“在字段中查找”对话框中的选项相同，可以通过单击“编辑”菜单中的“查找”打开该对话框。如果在“宏”窗口中设置 FindRecord 参数，然后运行宏，那么单击“查找”命令时，将会在“在字段中查找”对话框中看到已选择了对应的选项。

在一次数据库会话中，Access 会保留最近的 FindRecord 参数，执行后续的 FindRecord 操作时，无需重复输入同样的条件。如果将某个参数留空，Access 会使用该参数最近的设置，即由上一次 FindRecord 操作或“在字段中查找”对话框中进行的设置。

如果想通过宏来查找记录，请使用 FindRecord 操作，而不要使用 RunCommand 操作并将其参数设置为运行“查找”命令。

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

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

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

如果使用命令按钮来运行包含 FindNext 操作的宏，也会发生同样的情况。

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

GoToControl 操作

使用 GoToControl 操作，可以把焦点移到打开的窗体、窗体数据表、表数据表或查询数据表中当前记录的指定字段或控件上。如果要让某一特定的字段或控件获得焦点，可以使用该操作。然后可将获得焦点的字段或控件用于比较或 FindRecord 操作。另外，还可以根据特定的条件，使用该操作在窗体中进行定位。例如，如果用户在“健康保险”窗体中的“婚姻”控件下输入“否”，那么焦点会自动跳过“配偶姓名”控件而移到下一个控件。

注意    此操作不能用于数据访问页。

GoToControl 操作具有下列参数：

说明   不能使用 GoToControl 操作将焦点移到隐藏窗体的控件上。

提示   可以使用 GoToControl 操作将焦点移动子窗体上，子窗体是一种控件。然后可以使用 GoToRecord 操作移到子窗体中的特定记录中。另外，也可以移到子窗体的控件上，方法是使用 GoToControl 操作先移到子窗体中，然后再移动到子窗体上的控件上。

若要在 Visual Basic 中运行 GoToControl 操作，可使用 DoCmd 对象的 GoToControl 方法。也可以使用 SetFocus 方法，将焦点移到窗体或其任何子窗体的控件上或者打开的表、查询、窗体数据表的字段中。

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

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

通过使用宏验证数据有效性

下面的验证宏检查在“供应商”窗体中输入的邮政编码。它显示 StopMacro、MsgBox、CancelEvent 及 GoToControl 操作的使用方法。条件表达式用于检查在该窗体上记录中输入的国家/地区和邮政编码。如果邮政编码不符合其国家/地区的正确格式，宏将显示消息框，并取消对记录的保存。然后您将返回到“邮政编码”控件并可以在那里改正错误。该宏应附加到“供应商”窗体的 BeforeUpdate 属性。