[Formlar]![ekleme]![degerim]
Formdaki butonun tıklandığında olayındaki kodları aşağıdaki ile değiştir.
If IsNull(Me.degerim) Then
MsgBox ("Barkod Alanı Boş Geçilemez vs.vs.vs.")
Me.degerim.SetFocus
Else
DoCmd.OpenQuery "getir"
End If