Question

我有一個Access宏，我只想在空白記錄上運行一個窗體。如何檢查記錄是否已保存。 Me.dirty屬性不適用於我，因爲它檢查是否已保存的記錄已被更改或修改。

Private Sub FIND_MEMBER_AfterUpdate() 
    Me.FIRST_NAME = DLookup("[FIRST_NAME]", "CM_ROSTER", "[SOC_SEC_NUM] = '" & Me.SOC_SEC_NUM & "'") 
    Me.MID_INIT = DLookup("[MID_INIT]", "CM_ROSTER", "[SOC_SEC_NUM] = '" & Me.SOC_SEC_NUM & "'") 
    Me.LAST_NAME = DLookup("[LAST_NAME]", "CM_ROSTER", "[SOC_SEC_NUM] = '" & Me.SOC_SEC_NUM & "'") 
End Sub 

我可能有一個解決方案：

私人小組FIND_MEMBER_AfterUpdate（）

If Me.NewRecord = True Then 


Me.FIRST_NAME = DLookup("[FIRST_NAME]", "CM_ROSTER", "[SOC_SEC_NUM] = '" & Me.SOC_SEC_NUM & "'") 
Me.MID_INIT = DLookup("[MID_INIT]", "CM_ROSTER", "[SOC_SEC_NUM] = '" & Me.SOC_SEC_NUM & "'") 
Me.LAST_NAME = DLookup("[LAST_NAME]", "CM_ROSTER", "[SOC_SEC_NUM] = '" & Me.SOC_SEC_NUM & "'") 



Else 

GoTo exit_sub 

End If 

exit_sub：

末次

Answer 1

這聽起來像你正在尋找的屬性是表單的.NewRecord屬性，在保存新記錄前爲true。