TextBox a rakamı 0.4661 olarak girmek!

[ocamsul]

Arkadaşlar merhabalar herkese iyi çalışmalar. TextBox a girdiğimiz rakamı 0.4661 şeklinde yani 0 dan sonra 4 basamak olarak girebilmek için formatı ne şekilde düzenlemeliyim? ayrıca söz konusu format diğer, yani 1.45 gibi biçimleride uygulayabilmeli.

 

[entropy_tr]

Sayın ocamsul, ben aşağıdaki kod ile istediğiniz formatı sağladım. Ondalık haneden sonrası eğer 4 basamaktan fazlaysa yuvarlayarak textbox'taki rakamı formata uygun hale getiriyor.
Örnek:
1,2345678 --> 1,2346
0,1 --> 0,1000
1,01 --> 1,0100

Private Sub TextBox1_BeforeUpdate(ByVal Cancel As MSForms.ReturnBoolean)
TextBox1.Text = Format(TextBox1.Text, "0.000#")
End Sub

 

[ocamsul]

SN: entropy_tr ilginize teşekkür ederim. Ancak sorunu çözmüyor. örneğin 1.12 şeklinde farklı bir giriş yaptığımızda hücre 1.200 şeklini alıyor ayrıca yine farklı olarak 1.234 şeklinde girdiğimizde de değer 1.200 biçimini alıyor. Biçim ayne ekli şekildeki gibi olmalı.

 

[entropy_tr]

Pardon, formatı ters yazmışım. Doğrusu kalın yazılı şekilde

Private Sub TextBox1_BeforeUpdate(ByVal Cancel As MSForms.ReturnBoolean)
TextBox1.Text = Format(TextBox1.Text, "0.###0")
End Sub

 

[ocamsul]

SN: entropy_tr ilginize çok teşekkür ederim. Çözümü textboxların sayı formatını ortadan kaldıeaeak çözdüm. Bu gibi durumda en kolayı bu gibi görünüyor.