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

时间:2018-01-08 08:36:40

标签: vba forms ms-access ms-office

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

通常当我创建一个表时会有一些列并在我开始输入表单输入时弹出一个表单来插入记录为什么如果按(X)按钮表单插入记录?

我正在寻找停止表单插入记录的最佳方法,只要没有按下特定的保存按钮?例如取消按钮或关闭(x)丢弃更改而不发出警告?

祝你好运

1 个答案:

答案 0 :(得分:2)

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

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

然后在保存按钮上,您可以验证输入并将标志设置为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