Forms 在编辑模式下打开表单,但不允许添加新记录

Forms 在编辑模式下打开表单,但不允许添加新记录,forms,ms-access,vba,ms-access-2007,Forms,Ms Access,Vba,Ms Access 2007,我有一个窗体,上面有两个按钮,可以打开窗体。一个按钮仅用于添加新记录。另一个按钮仅用于编辑现有记录。“编辑现有记录”按钮打开表单并仅显示过滤后的记录,但是当我找到最后一条记录时,我可以使用记录选择器前进到新记录。是否有方法防止用户在打开表单时通过选择编辑现有按钮添加新记录 顺便说一句,如果有用的话,唯一ID是一个自动编号字段(UID) 后一个按钮的代码如下所示: Private Sub cmdEditProjects_Click() Dim strSQL As String DoCm

我有一个窗体,上面有两个按钮,可以打开窗体。一个按钮仅用于添加新记录。另一个按钮仅用于编辑现有记录。“编辑现有记录”按钮打开表单并仅显示过滤后的记录,但是当我找到最后一条记录时,我可以使用记录选择器前进到新记录。是否有方法防止用户在打开表单时通过选择编辑现有按钮添加新记录

顺便说一句,如果有用的话,唯一ID是一个自动编号字段(UID)

后一个按钮的代码如下所示:

Private Sub cmdEditProjects_Click()

Dim strSQL As String

    DoCmd.OpenForm "New Data", , , , acFormEdit

    strSQL = "SELECT Table1.Car, Table1.Color, Table1.Owner, Table1.PurDate, Table1.ID, Table1.Pending FROM Table1 WHERE (((Table1.Pending)=-1) AND ((Table1.InActive)=0));"
    Forms![New Data].RecordSource = strSQL

End Sub

打开表单后,可以将其
allowaditions
属性设置为False

DoCmd.OpenForm“新数据”,数据模式:=acFormEdit
形式![新数据].AllowAdditions=False