AccessTr.neT

kendi çalışmanıza aşağıdaki kodları ekleyip dener misiniz?
Yalniz bir hatırlatma yapmalıyım siz istediğiniz kadar tabloda değişiklik yapın aşağıdaki kod bütün değişiklikleri geri alır eğer değişiklikleri sadece adet ve fiyat kutuları değiştiğinde olmasını istiyorsanız tum ilgili metin kutularının 6 kutununda değiştiğinde olayina

Me.toplam_adet = Nz(cola_adet) + Nz(su_adet) + Nz(meyve_suyu_adet)

Me.toplam_fiyat = Nz(cola_fiyat) + Nz(su_fiyat) + Nz(meyve_suyu_fiyat)

kodunu yazmanız gerek
Aşağıdaki kodlar her hangi bir metin kutusuna girildiğinde calisir
Yani ya sadec 6 metin kutusunun değiştiğinde olayına da yukardaki kodu yazarsınız yada sadece alttaki kodları forma eklersiniz

Public Function Degis()



Me.toplam_adet = Nz(cola_adet) + Nz(su_adet) + Nz(meyve_suyu_adet)

Me.toplam_fiyat = Nz(cola_fiyat) + Nz(su_fiyat) + Nz(meyve_suyu_fiyat)



End Function

Private Sub Form_Load()



For Each ctl In Me.Controls

        If ctl.ControlType = 109 Then ctl.OnEnter = "=Degis()"

Next ctl



End Sub

dilerim işinize yarar
iyi çalışmalar.

neden toplam fiyat ve adet miktarlarını tabloya ekliyorsunuz? zaten bunlar diğer alanlardaki verilerin işlenmesi sonucu oluşuyor tekrar tabloya kaydetmeye gerek var mı?

Sn.berduş hocam

Tablo da depolama yapmak için böyle bir toplama işlemine gerek duyduk

İlginizden dolayı size ve hocalarıma çok teşekkür ederim sağolun

çok işime yaradı.teşekkürler.