TextBox'a girdiğim rakkamın formatını ondalıklı yazdırmak

[millis]

Arkadaşlar, TextBox Kutusuna girdiğim rakkamın ondalıklı bir biçimde yazmasını istiyorum. Örn; 1250,84 rakkamının girişi yazarken 1.250,84 gibi yazmasını istiyorum. Birkaç formül denedim fakat olmadı. KDVMT.Text = Format(KDVMT.Text, "###0.00") bu formülü kullandığımda TextBox kutusunun içerisine rakkamı yazarken 1,00 yazıyor ve sadece virgülden sonraki rakkamları değiştiriyor. KDVMT.Text = FormatCurrency(KDVMT.Text, 2) formülünü kullandığımda TextBox ın içine ilk rakkamı girdiğimde rakkamın yanına TL ibaresi koyuyor, ikinci tuşa bastığımda hata mesajı veriyor. Bu konu hakkında yardımcı olurmusunuz. Hepinize şimdiden teşekkür ederim.

 

[Seyit Tiken]

Bu şekilde bir deneyin.

Private Sub TextBox1_AfterUpdate()
TextBox1 = Format(TextBox1, "#,##0.00")
End Sub

 

[Zeki Gürsoy]

Textbox1=Csng(Textbox1)

şeklinde de deneyebilirsiniz.