Discussion :

[Tempus01]

Bonjour le Forum,

Je cherche une solution pour changer la taille du dernier caractère dans une Textebox.
Dans l'exemple ci dessous, je souhaiterais que le troisième chiffres après la virgule de B.text soit plus petit d'une taille.

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
B.Text = Format(Val(B.Text), "0.000")
            If CType(Bmini.Text, Decimal) > CType(B.Text, Decimal) Then
                B.ForeColor = Color.Maroon
                            ElseIf CType(Bmini.Text, Decimal) <= CType(B.Text, Decimal) Then
                B.ForeColor = Color.Black
                            End If

Merci pour votre aide.