Question

我有一个表单可以在Access 2010中将新数据输入到表中。

我希望当前表中的请求ID字段为Max(Req_Number)+1，每当用户添加新记录并希望自动填充时，Req_Number也是关键。当使用数据模式时，所有字段都是空白的，所以我想知道如何使用访问中的表单将数据输入到表时使用函数锁定一个字段？

Answer 1

RequestID文本框应该是Locked and Disabled。将代码添加到表单的Before Insert事件中，如下所示：

Private Sub Form_BeforeInsert(Cancel As Integer)
On Error GoTo PROC_ERR

    RequestID = Nz(DMax("Req_Number", "myTable"), 0) + 1

PROC_EXIT:
    On Error Resume Next
    Exit Sub

PROC_ERR:
    MsgBox "Error " & Err.Number & " - " & Err.Description
    Resume PROC_EXIT

End Sub

在访问中使用表单添加新记录时如何在表单字段中保留公式

1 个答案: