按下按钮If（不存在记录）然后创建Else Update

Question

我有一份未绑定的表格。在表单上我有一个保存按钮。截至目前，当您按下保存按钮时，它会将表单上的信息保存到记录中，但每次按保存时，它都会添加新记录而不是更新记录。我需要它来更新当前记录而不是添加新记录。任何想法都表示赞赏。

这是我的代码：

Dim dblocal As DAO.Database
Dim rst As DAO.Recordset

Set dblocal = CurrentDb()
Set rst = dblocal.OpenRecordset("SUBJECT_DATABASE", dbOpenDynaset)

'Prim. ID var.
Dim EvtIDkey As Long

With rst
.AddNew
.Fields("LAST NAME") = Me.LNameTxtB
.Fields("FIRST NAME") = Me.FNameTxtB
.Fields("GENDER") = Me.GenderCboB
.Fields("DOB") = Me.DOBTxtB


'inserts primary id into textB
Me.EvtIDKeyTxtB = .Fields("ID")

.Update
End With

End If

我在考虑添加一个if语句，条件如下： 如果EvtIDKeyTxTB不为空，则更新存在记录。但是，如何更新现有记录？

如果我有主键，我能够以这种方式获取和更新记录吗？