j'ai touver un moyen avec keypress
'pour que le point soit une virgule :
If Asc(e.KeyChar) = 46 Then
If InStr(1, txt50e.Text, "," ) > 0 Then
e.Handled = True
Exit Sub
End If
txt50e.SelectedText = ","
End If
' SI la touche appuyée est autre que : un chiffre, une touche contrôle, une "," ou un "-"
' ALORS la touche est sans effet.
If Not (Char.IsDigit(e.KeyChar) Or Char.IsControl(e.KeyChar) _
Or e.KeyChar = "," Or e.KeyChar = "-" ) Then
If Asc(e.KeyChar) = 46 Then
e.Handled = True
Exit Sub
End If
e.Handled = True
Exit Sub
End If