Forma kapatma işlemi için buton ekle, tıklandığında olayına aşağıdaki kodu yaz.
Kod:
If IsNull(Me.alistarihi) Or IsNull(imeino) Or IsNull(markaadi) Or IsNull(modeladi) Or IsNull(tedarikturu) Or IsNull(alisfiyati) Or IsNull(satisilkfiyati) Then
If MsgBox("Formda Boş Alanlar Mevcut. Kaydedilmeden Kapatılsın mı?", vbInformation + vbYesNo, "Kapatılıyor...") = vbYes Then
Me.Undo
DoCmd.Close
End If
Else
DoCmd.Close
End If