Access：切换记录时触发宏

Question

在我的 Access 表单中，我有一个宏，用于确认表单已正确填写。如果用户点击另一条记录，宏应该运行，如果需要，弹出一个消息框说“你想留在这个页面上吗？”。如果“否”，则继续下一条记录，如果“是”，则保留在同一记录上。无论哪种方式，用户所做的任何更改都会被保留。

我不确定我应该将此宏绑定到哪个表单事件，以及是否应该使用 CancelEvent 来保持相同的记录。

AfterUpdate 似乎最接近，但无论我按是还是否，CancelEvent 都会将它保留在同一记录中。

（如果宏运行 - 或不运行 - 当用户没有更改任何内容（例如在扫描记录时）时，也没关系。以更容易的为准。）

PS：我想继续使用这个宏，但如果我必须使用 VBA，我可能会使用这个解决方案：Run VBA on record change and not form open Access 2013

Answer 1

这就是您如何使用表单BeforeUpdate 事件与 VBA（参见代码中的 cmets）：

Private Sub Form_BeforeUpdate(Cancel As Integer)
    'If no pending edits were made in the current record,
    'let the user move to another record.
    If Not Me.Dirty Then Exit Sub

    'You can check the user entries here, and if all is fine
    'just exit the sub, so the user can move to another record
    '(pending edits will be saved automatically).
    'This is just an example:
    If Me.Field1 = "a" And Me.Field2 = "b" Then Exit Sub

    'If the user doesn't want to stay on the current record,
    'let him move to another record (pending edits will be saved automatically).
    If MsgBox("Do you want to remain on this page?", vbYesNo + vbDefaultButton1, _
        "Attention") = vbNo Then Exit Sub

    'Cancel moving to another record.
    Cancel = True
End Sub

Me 在 VBA 中用于表单代码指向当前表单实例。