TEXBOXT BÖLME İŞLEMİNDE VİRGUL HATASI

[ofbayoglu]

Merhaba arkadaşlar bu şekilde hesaplama formülümde textbox61 e yazarken ondalıkla sayıyı doğru yazıyor fakat Texbox53 ü hesaplarken kullandığımda çıkan sonuçu küsuratı hesaplamadan bölme işlemi yapıyor bu konuda yardımcı olabilirimsiniz. yapmak istediğim kısaca ekrana atıyorum.



Sub hesapalma1()
On Error Resume Next

TextBox61 = Format(CDbl(TextBox42) * CDbl(TextBox51), "#,##0,00")
TextBox53 = Format(CDbl(TextBox61) / CDbl(TextBox52), "#,##0,00


End Sub

 

[Biolightant]

merhaba,
Bilgisayarımda TR bölge ayarları geçerli

TextBox1 = Format(CDbl(TextBox3) / CDbl(TextBox5), "#,##0.00") ' 3,33 = 10 / 3

TextBox2 = Format(CDbl(TextBox4) \ CDbl(TextBox6), "#,##0.00") ' 3,00 = 10 \ 3

 

[ofbayoglu]

merhaba,
Bilgisayarımda TR bölge ayarları geçerli

TextBox1 = Format(CDbl(TextBox3) / CDbl(TextBox5), "#,##0.00") ' 3,33 = 10 / 3

TextBox2 = Format(CDbl(TextBox4) \ CDbl(TextBox6), "#,##0.00") ' 3,00 = 10 \ 3

MALESEF OLMADI BENDEKİ TEXTBOX61 E TAM SAYI OLARAK YAZSA VİRGÜL FİLAN OLMADAN ASLINDA İŞİMİ GÖRECEK ORDA VİRGÜL YAZMASINA RAĞMEN NORMAL SAYI OLARAK ÇARPIM YAPIYOR

 

[Biolightant]

Maalesef sorununuzu algılayamadım, forumda diğer arkadaşlar yardımcı olacaktır.

 

[Korhan Ayhan]

Bahsettiğiniz TextBoxlarda sayısal formatınız nasıl?

 

[alicimri]

TextBox61 = Format(CDbl(TextBox42) * CDbl(TextBox51), "#,##0,00")

TextBox42 ve TextBox51 e ne yazıyorsunuz.