Discussion :

[petibonohm]

bonjour,

je cherche a bloquer la saisie dans un textbox...

l'utilisateur entre un coefficient, mais mais d'un seul chiffre après la virgule...

j'ai déjà verrouillé les caractère que je ne veux pas...

mais là je bloque...

merci

[ouskel'n'or]

Code :

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

1
2
3
4
5
6
7
8
Private Sub TextBox1_Change()
Dim ok as boolean
ok = InStr(TextBox1, ",") <> 0
If ok Then
    If Len(Right(TextBox1, Len(TextBox1) - InStr(TextBox1, ","))) > 1 Then _
        TextBox1 = Left(TextBox1, Len(TextBox1) - 1)
End If
End Sub

tu peux tester pour nous ?
A+

[petibonohm]

Code :

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

1
2
3
4
5
6
7
8
Private Sub TextBox1_Change()
Dim ok as boolean
ok = InStr(TextBox1, ",") <> 0
If ok Then
    If Len(Right(TextBox1, Len(TextBox1) - InStr(TextBox1, ","))) > 1 Then _
        TextBox1 = Left(TextBox1, Len(TextBox1) - 1)
End If
End Sub

tu peux tester pour nous ?
A+

ça marche nikel,

je teste encore