Discussion :

[jeremyvb11]

Bonjour à tous,

Sous visual basic express 2010 :

J'essaye en vain dans un calcul d'interdire la saisie des lettres dans un textbox mais sans succés
avec un peu de recherche j'ai trouvé le code suivant qui me convient presque :

Code :

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

1
2
3
4
5
6
7
8
If e.KeyChar = Chr(8) Then
        Else
 
        End If
        If Not IsNumeric(e.KeyChar) Then
            e.Handled = True
            MessageBox.Show("Valeur numérique uniquement !")
        End If

Seulement j'aimerai activer le point "." afin d'inscrire un chiffre à virgule et activer la touche "retour" du clavier pour une correction du chiffre

Sauriez-vous qu'est-ce que je dois rajouter dans mon code ????

Merci beaucoup

[tomlev]

Code :

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

1
2
3
4
        If Not IsNumeric(e.KeyChar) AndAlso e.KeyChar <> "."c Then
            e.Handled = True
            MessageBox.Show("Valeur numérique uniquement !")
        End If

[jeremyvb11]

C'est bon le point cependant pour la touche "retour" (sur le clavier elle ce situe au dessus de la grosse touche "entrée" lol) j'obtiens mon message "Valeur numérique uniquement"

Merci tomlev

[tomlev]

Il faut autoriser aussi les caractères de contrôle :

Code :

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

1
2
3
4
        If Not Char.IsControl(e.KeyChar) AndAlso Not IsNumeric(e.KeyChar) AndAlso e.KeyChar <> "."c Then
            e.Handled = True
            MessageBox.Show("Valeur numérique uniquement !")
        End If

[jeremyvb11]

Parfait

Merci beaucoup tomlev

[Kropernic]

Il faut autoriser aussi les caractères de contrôle

Nice la fonction IsControl ! Je ne connaissais pas et ça va me simplifier bcp la vie (oui je les listais tous un à un comme un grand malade^^)