在Access 2013连续表单中隐藏新行按钮



我在Access中有一个连续的形式,Allow Additions设置为Yes。我试图启用或禁用删除按钮取决于用户是否在该记录中填写了数据。换句话说,我想为表单底部的空白记录隐藏按钮。

我在Form_Current事件中尝试了以下操作,但它同时启用或禁用所有按钮,只有当我单击记录时才运行。我需要它立即运行,并在我添加新行时更新。

If Me.NewRecord Then
    btnDelete.Visible = False
Else
    btnDelete.Visible = True
End If

编辑:与工作代码。

If Me.NewRecord Then
    'show error message
    MsgBox ("Unable to delete empty row.")
Else
    'deletion code
End If

连续表单不允许这样——所有东西看起来都一样。

您可以向btnDelete_Click事件添加代码,检查Me.NewRecord并退出子

当用户开始在"add"中输入数据时,上面的代码处理,然后单击该行上的"删除"。

If Me.NewRecord Then
    'code to undo/clear partially entered new record
    If Me.Dirty Then
        DoCmd.RunCommand acCmdUndo
    End If
    
Else
    If MsgBox("Are you sure you want to delete this xxxx record?", vbYesNo) = vbYes Then
        DoCmd.RunCommand acCmdSelectRecord
        DoCmd.RunCommand acCmdDeleteRecord
    End If
End If

最新更新