没有保存按钮的 MS Access 弹出和模态表单插入记录？

Question

所有观众和 MS 访问专家早上好，

通常当我制作一个 table 有一些列并制作一个弹出表单来插入记录时，当我开始输入表单输入时为什么如果我按 (X) 按钮表单插入记录？

我正在寻找停止表单插入记录的最佳方法，只要未按下特定的保存按钮即可？例如取消按钮或 Close(x) 在没有警告的情况下放弃更改？

此致

Answer 1

您需要手动处理表单的自动更新。

为此，您需要在表单的代码隐藏文件中有一个模块级布尔变量。这将作为停止表单自动更新的标志。

然后您可以在保存按钮上验证输入并将标志设置为 True 以允许保存表单。

'Flag
Private mIsUserUpdate As Boolean 

'Cancel auto-update
Private Sub Form_BeforeUpdate(Cancel As Integer)
    If Not mIsUserUpdate Then Cancel = True
End Sub

'Save button
Private Sub ButtonSave_Click()
    If Validated then
        mIsUserUpdate = True
        DoCmd.RunCommand acCmdSaveRecord
    End If
End Sub

没有保存按钮的 MS Access 弹出和模态表单插入记录？

MS Access pop up and modal form insert record without save button?

forms

ms-access

vba

ms-office