textbox format sorunu?

[byteman_2]

biliyorum sitede bu konuyla alakalı bir çok örnek ve soru var.
ama ben bu işi çözemedim.

Private Sub TextBox1_Exit(ByVal Cancel As MSForms.ReturnBoolean)
TextBox1 = Format(TextBox1.Value, "#,##0.00")
End Sub

sorun şu ki textbox1 e yazdığım 1, 1000 ve 1000000.... formul sonucuna hepsi 1 olarak etki ediyor. yani ilk noktadan sonraki kısmı ondalık sayı olarak görüyor.
nasıl bi değişiklik yapmam lazım yardımlarını bekliyorum

 

[alpi]

Private Sub TextBox1_Exit(ByVal Cancel As MSForms.ReturnBoolean)
TextBox1.Text = FormatNumber(TextBox1.Text, 2)
End Sub​

 

[byteman_2]

sayın alpi teşekkürler ama

sorunum çözülmedi bi de örnek dosya hazırladım bi göz atarsanız sevinirim.

 

[alpi]

Siz TextBox lardaki sayı biçiminin nasıl olmasını istiyorsunuz?

 

[Seyit Tiken]

Ekli dosyayı inceleyiniz.. Örnek olarak; 1258,23 ile 20 rakamları ayrı ayrı Text1'e girip entere basın ve sonucu değerlendiriniz.

 

[byteman_2]

sayın alpi ve sayın seyit teşekkür ederim

textboxların sayı formatında olmasını istiyorum, orası ok.
benim istediğim şu:
textbox10= hammadde birim fiyatı
textbox 1=ürün1 için kullanılan 1.kısım hammadde ağırlığ(gr)
textbox2=ürün1 için kullanılan 2.kısım hammadde ağırlığ(gr)
textbox3=ürün1 için kullanılan 3.kısım hammadde ağırlığ(gr)
textbox4=ürün1 için kullanılan 4.kısım hammadde ağırlığ(gr)

textbox5= bu 4 adet gramajların textbox10 daki değerle çarpıp toplamının bulunacağı yer.

fakat formatla ilgili olarak örnek doyada da anlatmaya çalıştım gramaja 1 de yazsam 1000 de yazsam hep sonuç 4000 çıkıyor. niye anlamadım?

anlatabilmişimdir umarım. şimdiden teşekkürler.

 

[byteman_2]

sorum anlaşılmadı galiba...

olsun sizin canınız saolsun arkadaşlar biraz kurcalayım bakalım ben belki düzeltirim. teşekkürler hepinize