textbox ta sayı formatı

[teknikyapı]

Merhaba.
Arkadaşlar 2 adet textboxtaki sayıları 3.texboxta çarpımlarını alıyorum.Texboxlarda şöyle bir sayı formatı kullanıyorum :
Private Sub TextBox4_AfterUpdate()
TextBox4 = Format(TextBox4, "#,##0.00")

Fakat klavyede ( numlock ) ki nokta işaretini (.) kullanırsam rakamı farklı yazıyor.Mesala 11,11 yazmak isterken 1111,00 oluyor...( kalvyedeki diğer shiftin yanındaki nokta işaretini kullanırsam sorun olmuyor.Biraz karışık gibi …yardımcı olursanız sevinirim
İyi çalışmalar

 

[İhsan Tank]

merhaba
sorunuzu bir örnek dosya ile destekleseniz daha iyi olur

 

[teknikyapı]

sn cılgın86'lı ilginiz için teşekkür ederim.Forumda ararken şöyle bir çözüm buldum.

Cells(A, "g") = CCur(TextBox4.Value)

Bu şekilde texboxtan hücreye kaydettiğim değer sayı olarak dikkate alınıyor.Bu arada Windows bölgesel ve dil ayarlarında ondalık simgesi virgül (,) basamak gruplandırma simgesi nokta (.) olmalı.
iyi çalışmalar.

 

[Seyit Tiken]

TextBox4 = Format(TextBox4, "#.##0,00")

Nokta ile virgülün yerini değiştirin.

 

[Ergün Güler]

Selamlar,
aynı sorunları bende yaşıyorum.Bir türlü özüm bulamadık.