Sub AdisyonHesapla()

Me.ADTOP = IIf(IsNumeric(adisyon1.Form!toplam), adisyon1.Form!toplam, 0)

Me.HESTOP = Me.KONTOP + Me.ADTOP

Me.ODTUTARI = Me.HESTOP - Me.onodeme - Me.ıskonto

Me.KAL = Me.ODTUTARI - Me.Nakitodeme - Me.Kredikartiodeme

şeklinde kod ekleyip, hesaplama için veri girişi yapılan denetimlerin güncelleştirme sonrasında olaylarına

Call AdisyonHesapla

yazarak hesaplama yaptırabilirsiniz.

Sayın Ozan bey,,
Uygulamayı aynen uyguladım ancak sonuç olumsuz,Ayrıca Sub Adisyonhesapla () kodunun en sonuna End Sub ekledim diğer alanlarada Call AdisyonHesapla () ekledim,saygılarımla.

End Sub kodunu eklemeyi unutmuşum, Ancak Call adisyonhespala kodunda parantezler olmayacak.

Hocam yine olmadı,üzgünüm.Saygılarımla

Kodda belirtilen Adtop, hestop gibi alanların denetim kaynağı var mı? Yoksa ilişkisiz mi?

sayın fascioglu,

bahsettiğiniz konuya dair ek'te örnek uygulama mevcuttur.inceleyebilirsiniz.

iyi çalışmalar,
saygılar.