(13/02/2020, 20:11)userx yazdı: Ama benim gönderdiğim kodun üst bölümünü kaldırmışsın. O kısmı ekler misin?

If IsNull([txtUyeNo]) Or IsNull([cboTaksitAyKapama]) Or IsNull([txtAidatTutar]) Then

MsgBox "Lütfen eksik bilgileri tamamlayınız."

DoCmd.GoToControl "txtUyeNo"

 Else

üstte yazdığın Private Sub btnKaydet_Click() in hemen altına ekle.

Ekledim deminden beri onla ugrasiyorum. O kodu gelistirebilirmiyiz diye soracaktim size. Soyleki bu form icin degil ama metin kutularinin girilmesi zorunlu olan alanlardan hangileri bos birakildiysa o metin kutularini renklendirmek vs yada baska bir sey yapilabilirmi diye soracaktim