Teşeküre ederim hocam explicit kullandığım formların sadece bir tabesinde aşağıdaki kodda hata verdi

Private Sub Komut141_Click()
If IsNull(Me.Açılan_Kutu0) Or IsNull(Açılan_Kutu2) Or IsNull(Açılan_Kutu4) Or IsNull(Açılan_Kutu10) Or IsNull(Metin12) Or IsNull(Metin14) Then

If MsgBox("Formu Kapatmak İstediğinizden Emin misiniz?", vbInformation + vbYesNo, "ERZURUM OTOMASYON") = vbYes Then
Me.Undo
DoCmd.SetWarnings False
DoCmd.RunSQL ("DELETE ID_GIRIS, ID_URUN, ID_KATEGORI, ID_BIRIM, GIRIS_TARIHI, ID_TEDARIKCI, GIRIS_MIKTARI FROM T_GIRIS WHERE (((ID_GIRIS) Is Null)) OR (((ID_URUN) Is Null)) OR (((ID_KATEGORI) Is Null)) OR (((ID_BIRIM) Is Null)) OR (((GIRIS_TARIHI) Is Null)) OR (((ID_TEDARIKCI) Is Null)) OR (((GIRIS_MIKTARI) Is Null));")
DoCmd.SetWarnings True
ShrinkMe (Me.Name)
DoCmd.Close
DoCmd.OpenForm "F_CIKIS", acNormal
End If

Else

mesaj = MsgBox("Form Kapatılmadan Önce Girilen Veriler Kaydedilsin mi?", vbCritical + vbYesNoCancel, "ERZURUM OTOMASYON")

Select Case mesaj
Case 6


DoCmd.Save
MsgBox Metin14 & " - " & Metin222 & " STOK GİRİŞİ GERÇEKLEŞTİ, GÜNCEL STOK MİKTARI " & ([Metin217] + [Metin14]) & "", vbInformation, "ERZURUM OTOMASYON"
ShrinkMe (Me.Name)
DoCmd.Close
DoCmd.OpenForm "F_CIKIS", acNormal
Case 7

Me.Undo
ShrinkMe (Me.Name)
DoCmd.Close
DoCmd.OpenForm "F_CIKIS", acNormal
Case 2

Exit Sub
End Select

End If


End Sub


Bu kodun başlığı Option Compare Database olunca hata vermiyor normalde..