删除附在表格上的表单上的删除按钮

我有一个表单，可让您单击记录上的“更多信息”，然后弹出一个表单（SupplierInfoF），其中包含有关该记录的更多信息，方法是显示所有信息在文本框中;它弹出的表单有一个记录源连接到附加到表的查询（SupplierMoreInfoQ）。所以如果我编辑这些字段，它会在表格上编辑它们。尽管我想在这个表单上添加一个DELETE按钮，如果你按下它，它会弹出一个msgbox，询问你是否确定要删除这条记录，如果你按下yes，它会删除记录并将你放回先前的表单（SupplierListF）。我会如何去做这件事？删除附在表格上的表单上的删除按钮

来源

2013-10-29 D347HxD

以下代码允许您接管对删除的控制并且不允许Access显示其警告。一旦删除完成，表单关闭。

If MsgBox("Are you sure that you want to delete this record?", _ 
       vbInformation + vbYesNo, _ 
       "DELETION REQUEST") = vbYes Then 
    DoCmd.SetWarnings False 
    DoCmd.DoMenuItem acFormBar, acEditMenu, 8, , acMenuVer70 
    DoCmd.DoMenuItem acFormBar, acEditMenu, 6, , acMenuVer70 
    DoCmd.SetWarnings True 

    DoCmd.Close 
End If

来源

2013-10-29 17:13:32 Linger

删除附在表格上的表单上的删除按钮

回答

相关问题