在记录更改时运行 VBA，而不是打开 Access 2013 [英] Run VBA on record change and not form open Access 2013

问题描述

我的宏有两个标准.

• 它应该只在用户切换记录时运行
• 无论记录是否被修改，它都应该运行

On Current 有效，但它也可以在表单打开时运行.After Update 仅在字段更改时运行.是否有符合我标准的活动?

On Current works but it also runs on form open. After Update only runs if a field is changed. Is there an event that fulfils my criteria?

推荐答案

您可以使用静态变量:

Private Sub Form_Current()

    Static Opened As Boolean

    If Opened = False
        ' Form opens.
        Opened = True
    Else
        ' Do stuff.
    End If

End Sub

操作前一条记录:

Private Sub Form_Current()

    Static Opened As Boolean
    Static LastId As Long

    If Opened = False
        ' Form opens.
        Opened = True
    ElseIf LastId <> 0 Then
        ' Do stuff using LastId as the Id.            
    End If

    ' Save current Id.
    LastId = Nz(Me!Id.Value, 0)

End Sub

这篇关于在记录更改时运行 VBA，而不是打开 Access 2013的文章就介绍到这了，希望我们推荐的答案对大家有所帮助，也希望大家多多支持IT屋！