Yapmış olduğum veri tabanı çalışır durumdayken, access seçeneklerinden geçerli veri tabanından form görüntüle oluşturdum. Sonrasın da yapmış olduğum formdaki düğmelere basınca return without gosub hatası veriyor. Örneği ektedir.

Private Sub kaydet_Click()
If IsNull(Me.birim) Or IsNull(Me.kodu) Or IsNull(Me.islem_tani) Then MsgBox "Lütfen alanları boş geçmeyin ", 48, "Kayıt İşlemi"

Me.birim.SetFocus

Exit Sub

Else


DoCmd.SetWarnings False
DoCmd.RunSQL "INSERT INTO ana ([birim],[kodu],[islem_tani]) VALUES ('" & Me.birim.Value & "','" & Me.kodu.Value & "','" & Me.islem_tani.Value & "')"
DoCmd.SetWarnings True
Me.Refresh
 Me.kimlik = ""
 Me.birim = ""
 Me.kodu = ""
 Me.islem_tani = ""
 
 End If
End Su