刪除附在表格上的表單上的刪除按鈕

我有一個表單，可讓您單擊記錄上的「更多信息」，然後彈出一個表單（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

刪除附在表格上的表單上的刪除按鈕

回答

相關問題