textbox da çarma işlemi

[acebeci]

arkadaşlar aşağıda ki kodda çarpma işlemi hariç diğer işlemimleri gerçekleştiriyor.textbox13 ve textbox14 hep sıfır çıkıyor tabi doğal olarak textbox 15 de.bunun sebebi ne olabilir nerde yanlış yapmış olabilirim tex13 ve tex14 deki işareti toplama yapsam veya çıkarma ozaman işlem yapıyor fakat çarmayı birtürlü yaptıramadım

kod:
TextBox6.Value = Val(TextBox5) * 2 / 100
TextBox7.Value = Val(TextBox5) - Val(TextBox6)
TextBox9.Value = Val(TextBox7) - Val(TextBox10)
TextBox13.Value = Val(TextBox5) * Val(TextBox11)
TextBox14.Value = Val(TextBox7) * Val(TextBox12)
TextBox15.Value = Val(TextBox13) + Val(TextBox14)

 

[Ferhat Pazarçevirdi]

Merhabalar

Textbox5, Textbox7, Textbox11 veya TextBox12'den herhangi biri boş veya "0" ise, Textbox13 veye TextBox14 ; "0" değer alır.

Çıkarma işleminde "0" yutan eleman olmadığından Textbox'lardan herhangi birinin boş ve diğerinin dolu olması, "0"dan farklı bir sonuç döndürmeye yeterlidir.

 

[acebeci]

Sayın fpc eğer sizde uygun görürseniz ben bu dosyayı biraz daha derleyip toparlayıp ekleyeyim.dosya üzerinde incelersek herhalde daha sağlıklı olacak çünkü tüm verileri girmeme rağmen çarpma işlemini yaptıramıyorum

 

[Ferhat Pazarçevirdi]

Bir de şunu deneyin.

Eğer herhangi bir Textbox'a girdiğiniz değer, 0 ila 1 arasında ondalık bir sayıysa, -VAL fonksiyonu ile- bu değer, çarpma işlemine 0 yansıyor olabilir.

Böyle bir durum sözkonusu mu?

 

[acebeci]

evet sayın fpc.dosyayı ekliyorum anlatmaya çalıştım anlamadığınız biryer olursa ben bekliyorum hemen cevaplayacağı.sayın fpc dosyayı görünca yine mi bu dosya diyeceksiniz ama ne olur anlayışla karşılayın geçen sene çok sıkıntı çektim bu sene sezon açılmadan güzel bir çalışma yapmak istiyorum bu tabi tamamen sizlerin eseri şimdiden çok teşekkürle

 

[Ferhat Pazarçevirdi]

Çarpma işlemleri ben de gerçekleşiyor. Acaba bahsettiğiniz problem farklı birşey mi?

Kaydet butonuna bastığımda, Msgbox'la birlikte textboxlara çarpım sonuçları geliyor ...

Sorununuzu, dosyadan bir örnekle açıklar mısınız?

 

[acebeci]

sayın fpc bende 1 tutar 2 tutar ve genel toplam 0 çıkıyor.dosyada nasıl gösterebilirim bilemedim.kaydet dedikten sonra kapanıyor yani o ekranı nasıl gösterebilirim bilemiyorum.zaten kaydedilen müşteriye ait sayfadada o bölümler 0 olarak kaydediliyor

 

[Ferhat Pazarçevirdi]

Peki o zaman, bana herbir Textbox'a neler girdiğinizi bir örnekle açıklayınız.

Ben de buradan o şekilde girerek çarpımdaki 0 sonucunu görmeye çalışayım.

 

[acebeci]

kime gittiğini seçtikten sonra
mesela bürüt yazan kısma=36500
2.kalite yazan yere=2500
1.kalite fiyatına=0,30
2.kalite fiyatına=0,15

bu şekilde bir denermisiniz

 

[Ferhat Pazarçevirdi]

Ama size 4 nolu mesajda 0 ila 1 arasında ondalık bir değer giriyorsanız VAL fonksiyonunun size 0 döndüreceğini söylemiştim....

Şu satırları;

TextBox13.Value = Val(TextBox5) * [COLOR=red]Val(TextBox11)
[/COLOR]TextBox14.Value = Val(TextBox7) * [COLOR=red]Val(TextBox12)[/COLOR]

Şu şekilde değiştirin ....

TextBox13.Value = Val(TextBox5) * [COLOR=green]TextBox11
[/COLOR]TextBox14.Value = Val(TextBox7) * [COLOR=green]TextBox12[/COLOR]

Şimdi, Textbox'lar dolu geldi mi?

 

[acebeci]

çok ama çok teşekkürler sayın fpc.ben sizin 4 numaralı msj ınıza 5.numaralı msj ımda evet sayın fpc diye cevap vermişdim.ama küçbir anlaşmazlık olmuş herhalde özür dilerim.sizi yordum.sorun çözüldü teşekkür ederim

 

[Ferhat Pazarçevirdi]

Olur böyle şeyler

İyi çalışmalar