Hatalar:
1-) butonun tıklandığında olayında 

On Error GoTo Err_FaturaSil_Click

Kodu mevcut, ancak hata denetimindeki kod

Err_FaturaSil__Click:

Her iki kod aynı değil, hata durumunda Err_FaturaSil_Click kodunu arayacak ama bu kod yok.

2-)

If InputBox("Lütfen Silme Şifresini Giriniz") = Sifre Then

Exit Sub

şeklinde kod eklenmiş, şifreler eşit ise koddan çık demişsiniz. Şifreler eşit ise kayıt silinmesi gerekli.

If InputBox("Lütfen Silme Şifresini Giriniz") <> Sifre Then

    MsgBox ("hatali sifre")

    Exit Sub

else



....silme kodu buraya.....



end if

şeklinde kod olmalı ki, şifreler uyuşmadığında işlem yapmasın, uyuştuğunda silsin.

3-) Eklediğiniz silme kodunu formdaki geçerli kaydı siler. Ancak, formun kayıt kaynağındaki sorgudan dolayı geçerli kayıt silemezsiniz. Sorgu güncelleştirilebilir bir sorgu değil, salt okunur. Silme işleminin faturaid alanına göre FaturaBilgisi ve FaturaDetay tablolarından yapılması gerekli. Silme kodunuz

  DoCmd.SetWarnings False



    DoCmd.RunSQL "DELETE FaturaID FROM FaturaBilgisi WHERE (((FaturaID)=" & Me.FaturaID & "));"

    DoCmd.RunSQL "DELETE FaturaID FROM FaturaDetay WHERE (((FaturaID)=" & Me.FaturaID & "));"



    DoCmd.SetWarnings True

Şeklinde olmalı.

Umarım anlaşılır olmuştur.