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

【问题标题】：Open form in edit mode but disallow adding new records在编辑模式下打开表单但不允许添加新记录
【发布时间】：2015-03-09 12:35:25
【问题描述】：

我有一个带有两个按钮的表单，可以打开一个表单。一个按钮仅用于添加新记录。另一个按钮仅用于编辑现有记录。编辑现有按钮打开表单并仅显示过滤的记录，但是当我到达最后一条记录时，我可以使用记录选择器前进到新记录。有没有办法防止用户通过选择编辑现有按钮打开表单时添加新记录？

顺便说一句，如果有用的话，唯一 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

【问题讨论】：

标签： forms ms-access vba ms-access-2007

【解决方案1】：

打开表单后，可以将其AllowAdditions属性设置为False。

DoCmd.OpenForm "New Data", DataMode:=acFormEdit
Forms![New Data].AllowAdditions = False

【讨论】：