me.TARİH_ALANI = "" ile boşaltman daha iyi olacaktır.
If Me.TARİH_ALANI = "" Then MsgBox ("Lütfen Tarih Alanını Boş Bırakmayınız."): Me.TARİH_ALANI.SetFocus: Exit Sub
veya direkt boş olarak algılatmak istersen
If IsNull(Alis_Satis_Yapilan_Sirket) Then MsgBox ("Lütfen Tarih Alanını Boş Bırakmayınız."): Me.Alis_Satis_Yapilan_Urun_Birim.SetFocus: Exit Sub
hata görmeden geçmek için ise
on error resume next
hataları es geçmek yerine kendi belirleyeceğin uyarı mesajlarını vermen daha faydalı olur. programı kullanan kişi kayıt butonuna bastığında problem var ise ve on error resume next ile geçtiğinde kayıt olmadığı halde uyarı almadığı için kayıt etti gözü ile bakacak ve ileride problemlere yol açacaktır.