Restreindre caractère textbox

Résolu
alihome Messages postés 18 Date d'inscription dimanche 22 octobre 2006 Statut Membre Dernière intervention 2 juin 2011 - 31 mars 2008 à 20:25
alihome Messages postés 18 Date d'inscription dimanche 22 octobre 2006 Statut Membre Dernière intervention 2 juin 2011 - 1 avril 2008 à 17:40
Bonjour à tous,

J'aimerais savoir comment je pourrais restreindre une textbox à seulement 2 caractere ET aux chiffres.

J'ai trouver ce code pour restreindre la saisie aux chiffres mais je n'arrive pas à étendre la restriction au autre caractere que je voudrais : le point . et les deux points :


    Private Sub TextBox_KeyPress(ByVal sender As System.Object, ByVal e
As System.Windows.Forms.KeyPressEventArgs) Handles TextBox.KeyPress

        If Asc(e.KeyChar) = Keys.Back Then

            Exit Sub

        End If


        If IsNumeric(e.KeyChar) = False Then

            e.Handled = True

            Exit Sub

        End If

    End Sub

(je precise que je suis en vb.net et que c'est pour une saisie d'ip avec ports.

Cordialement,

AliHome.

4 réponses

cs_christoni Messages postés 140 Date d'inscription mardi 25 novembre 2003 Statut Membre Dernière intervention 1 novembre 2010 7
31 mars 2008 à 22:25
Bonsoir
Avec les regex.
Si la touche appuyée ne correspond pas à l'expression,
le caractère est stoppé.
If e.KeyChar <> System.Text.RegularExpressions. _
Regex.Match(e.KeyChar, "[\d.:]").Value Then
e.Handled = True
End If
Les crochets représentent le groupe des caractères admis.
\d représente les chiffres de 0 à 9;
Enfin le groupe admet le . e le :

Bonne soirée.
3
alihome Messages postés 18 Date d'inscription dimanche 22 octobre 2006 Statut Membre Dernière intervention 2 juin 2011
1 avril 2008 à 17:40
Bon apres une recherche j'ai finis par trouver donc je donne le code pour ceux que ca interesse :

        If Asc(e.KeyChar) = Keys.Delete Then
            Exit Sub
        End If
        If Asc(e.KeyChar) = Keys.Back Then
            Exit Sub
        End If
        If e.KeyChar.GetHashCode = 196611 Then
            Exit Sub
        End If
        If e.KeyChar.GetHashCode = 1441814 Then
            Exit Sub
        End If

Ca accepte les retours(suppression du caractere), la suppresion de caractere, le copié et le collé.

Cordialement,

AliHome
3
alihome Messages postés 18 Date d'inscription dimanche 22 octobre 2006 Statut Membre Dernière intervention 2 juin 2011
31 mars 2008 à 22:28
Merci beaucoup ! ca fonctionne parfaitement :)

Bonne soirée .
0
alihome Messages postés 18 Date d'inscription dimanche 22 octobre 2006 Statut Membre Dernière intervention 2 juin 2011
31 mars 2008 à 22:41
Ah par contre je viens de remarquer que je ne peux pas faire de copier/coller avec ctrl+c et ctrl+v en utilisant ce code !

Si tu aurais une solution pour ca tu me rendrais encore un grand service ;)
0
Rejoignez-nous