Question

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

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

Answer 1

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

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

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

1 个答案: