Sn.@berduş hata diğer formlarda oluşmadı fakat F_Password altına yazdığımız kod 2.bir tabloda silme yaptırmak istediğimde doğal olarak ilk if sorusunuda soruyor. Gelir formunda silme işlemi yapmak için mecburen ilk 
Ayni Yardim Kaydı ve bilgileri silinecek, İşlemin geri dönüşü yoktur, eminmisiniz  sorusunuda ekranda görmek ve tamam demek sonra ikinci çıkan pencerede de
Hesap Hareketleri Kaydı ve bilgileri silinecek, İşlemin geri dönüşü yoktur, eminmisiniz ? sorusuna tamam diyerek onaylamak gerekiyor. Böyle bir durumda ilk soru penceresini nasıl engelleriz.

Private Sub Password_TXT_AfterUpdate()

Dim limit As Integer

Dim frm As Form

Set frm = Forms(Split(OpenArgs, ";")(0))





    If DCount("*", "t_kullanici", "yetki='admin' and sifre='" & Me.Password_TXT & "'") > 0 Then

            

            If MsgBox("Ayni Yardim Kaydı ve bilgileri silinecek, İşlemin geri dönüşü yoktur, eminmisiniz ? ", vbCritical + vbYesNo, " !!! DİKKAT !!! ") = vbYes Then

             

                CurrentDb.Execute "delete from T_AyniYardim where [ID]=" & Split(OpenArgs, ";")(1)

                frm.AcikMi

                

            If MsgBox("Hesap Hareketleri Kaydı ve bilgileri silinecek, İşlemin geri dönüşü yoktur, eminmisiniz ? ", vbCritical + vbYesNo, " !!! DİKKAT !!! ") = vbYes Then

             

                CurrentDb.Execute "delete from T_HesapHareketleri where [ID]=" & Split(OpenArgs, ";")(1)

                frm.AcikMi



             End If

             End If

        

            Else

        

            limit = limit + 1

            

            MsgBox "Şifre Yanlış", vbExclamation, "HATALI ŞİFRE"

                    

    End If



        If limit = 3 Then



        End If

        

        'Me.Password_TXT = ""

        'Me.Password_TXT.SetFocus



End Sub