Virgules dans textbox et spinbutton

[paul87]

Bonsoir à tous, Bonsoir le Forum
J'ai réalisé un convertisseur °Celsius et °Fahrenheit..
qui fonctionne trés bien,..
mais je ne sais pas comment faire pour avoir des caculs avec un seul chiffre après la virgule..
31,3 au lieu de 31 par exemple....(pour les °Celsius)
et idem pour les °Fahrenheit
Merci à vous

 

[pierrejean]

Re : Virgules dans textbox et spinbutton

bonsoir paul

Tester modifier:

TextBox4.Value = ((TextBox3.Value - 32) * 5) / 9

par:

TextBox4.Value = Int(((TextBox3.Value - 32) * 50) / 9) / 10

Ps: En variante on peut remplacer Int (Entier) par Round (Arrondi)

 

[paul87]

Re : Virgules dans textbox et spinbutton

Bonsoir et merci pierrejean
en fait, ce que je voudrais c'est pouvoir incréménter les textbox1 et 3 de 0,1 en 0,1....
et bien sur aussi n'avoir qu'un seul chiffre après la virgule

 

[excalibur]

Re : Virgules dans textbox et spinbutton

bonjour paul pierrejean le forum si j ai compris!!

Private Sub SpinButton1_Change()
SpinButton1.Min = 300
SpinButton1.Max = 450
TextBox1.Value = SpinButton1.Value / 10
TextBox2.Value = ((9 * TextBox1.Value) / 5) + 32
End Sub
Private Sub SpinButton2_Change()
SpinButton2.Min = 860
SpinButton2.Max = 1130
TextBox3.Value = SpinButton2.Value / 10
TextBox4.Value = ((TextBox3.Value - 32) * 5) / 9
End Sub

 

[paul87]

Re : Virgules dans textbox et spinbutton

Bonsoir,
Merci, c'est parfaitement ça..
Merci