formdaki liste kutusunun verilerini açılışta topluyor, alt taraftaki toplam bu,
ayrıca liste kutusundan seçtikçe topladığı değerde üst taraftaki toplam,
üst taraftaki toplam doğru, ama
alt tarafa aldığı toplam yanlış,
yardımcı olabilirmisiniz?
sorgu kodu:
Dim SW As Long, Sonuc1 As Double, Sonuc2 As Double
For SW = 1 To Me.Liste0.ListCount - 1
Sonuc1 = Sonuc1 + Nz(CDbl(Me.Liste0.Column(1, SW)), 0)
Sonuc2 = Sonuc2 + Nz(CDbl(Me.Liste0.Column(2, SW)), 0)
Next SW
Me.TKG = Sonuc1
Me.TADET = Sonuc2[img]
