+- AccessTr.neT (https://accesstr.net)
+-- Forum: Microsoft Access (https://accesstr.net/forum-microsoft-access.html)
+--- Forum: Access Cevaplanmış Soruları (https://accesstr.net/forum-access-cevaplanmis-sorulari.html)
+--- Konu Başlığı: Metin Kutusundaki veri değiştiğinde başka bir alandaki verininde değişmesi (/konu-metin-kutusundaki-veri-degistiginde-baska-bir-alandaki-verininde-degismesi.html)
Metin Kutusundaki veri değiştiğinde başka bir alandaki verininde değişmesi - elmariachi - 17/04/2010
Merhaba arkadaşlar.
Bir proje üzerinde çalışıyorum ancak bir yerde takıldım.
Ekteki dosyada açılan ilk formda yapıyorum işlemleri.
Metin 17 (Rayiçler Toplamı) değerini, alt formdaki Nakliye Bedeli ve Malzeme Oranının çarpımından alıyor. (örnekte 40x2= 80)
Nakliyeli_Fiyat isimli alan ise değerini, metin17+Birim Fiyat toplamından alacak.
Yapmak istediğim metin17 nin değeri değiştiğinde Nakliyeli Fiyat alanınında değişmesi. (örnekte 80+50=130 olacak)
Ben metin17 nin "Değiştiğinde" olayına aşağıdaki kodu yazdım ama olmadı;
Me.Nakliyeli_Fiyat = Me.Metin17 + Me.Birim_Fiyatı
Yardımcı olursanız çok sevinirim, neyi yanlış yaptığımı bir türlü bulamadım.
Cvp: Metin Kutusundaki veri değiştiğinde başka bir alandaki verininde değişmesi - ozanakkaya - 17/04/2010
altformdaki "Malzeme_Oranı" alanının güncelleştirme sonrasında olayına aşağıdaki kodu yaz.
Ayrıca, hesaplanılabilir alanların tabloya kaydedilmesi doğru değil.
Kod:
Private Sub Malzeme_Oranı_AfterUpdate()
Forms![Poz Ekle]!Metin17.Requery
Forms![Poz Ekle]!Nakliyeli_Fiyat = Forms![Poz Ekle]![Birim_Fiyatı] + Forms![Poz Ekle]![Metin17]
End SubCvp: Metin Kutusundaki veri değiştiğinde başka bir alandaki verininde değişmesi - elmariachi - 17/04/2010
Üstad çok teşekkür ederim. "Malzeme_Oranı" sabit olduğu için "Nakliyeli_Fiyat" alanının güncelleştirme sonrasında olayına yazdım dediklerinizi ve sorun çözüldü.
Ancak "Nakliyeli_Fiyat" kısmına gelen veri, form yada program kapanırsa "Poz_Ekle" tablosunda değişiyor. Bunuda çözersek sorun bitmiş olacak.
Saygılar...
Cvp: Metin Kutusundaki veri değiştiğinde başka bir alandaki verininde değişmesi - Puletin - 19/04/2010
Metin17 nin veri kaynağına aşağıdakini
Kod:
=Nz(Yuvarlak(Nakliye.Form!Metin9;2);0)Kod:
Private Sub Form_Current()
Me.Nakliyeli_Fiyat = Me.Metin17 + Me.Birim_Fiyatı
End Sub