Tarih_TXT metin kutusunun güncelleştirme sonrasında olayında kod var ise sil, yerine Tarih_TXT metin kutusunun değiştiğinde olayına aşağıdaki kodu ekle.

Me.HesapTuru_CBO.SetFocus

Me.TF_HesapHareketleriGiderAF.Requery

Me.TF_HesapHareketleriGelirAF.Requery





Me.GiderToplami_TXT = Dsum ("[CikanTutar]", "T_HesapHareketleri", "[Tarih]= " & CLng([Tarih_TXT]) & " And [HesapTuru]='" & [HesapTuru_CBO] & "'")

Me.GelirToplami_TXT = Dsum ("[GirenTutar]", "T_HesapHareketleri", "[Tarih]= " & CLng([Tarih_TXT]) & " And [HesapTuru]='" & [HesapTuru_CBO] & "'")



Tarih_TXT.SetFocus