Bonjour,
j'aimerai bien savoir quel serait le code qui empêche aux utilisateurs de saisir des chiffres dans une zone de text ?
Merci de m'aider.
Bonjour,
j'aimerai bien savoir quel serait le code qui empêche aux utilisateurs de saisir des chiffres dans une zone de text ?
Merci de m'aider.
cadeau
nasty
Code : Sélectionner tout - Visualiser dans une fenêtre à part 'TODO : trouver une signature mieux que celle la
Juste les chiffres? L'utilisateur à le droit de rentrer des @, lettres etc...?
merci pour votre réponse mais je pense que cette solution est compatible avec visual studio2008 moi je suis sur la version VS2003 et la zone de texte sujet c'est une zone de text pour l'attribut age qu'il doit recevoir juste les chiffre ! mercii
il y a p-e une solution déjà existante,
sinon ce que je te propose blinder la saisie dans une TexteBox :
Code : Sélectionner tout - Visualiser dans une fenêtre à part Dim InfoBulle As ToolTipVoila
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27 Private Sub txtLargeurBoite_Validated(ByVal sender As Object, ByVal e As System.EventArgs) Handles txtLargeurBoite.Validated ' Nouvelle Info Bulle InfoBulle = New System.Windows.Forms.ToolTip ' avec un skin plus agréable InfoBulle.IsBalloon = True 'Si une erreur est présente alors on affiche le message d'erreur *voir en bas* On Error GoTo ErrLargeurBoite ' Si la textBox est vide on ne vérifie rien If (Me.txtLargeurBoite.Text = Nothing) Then Exit Sub End If 'Récupération et convertion de la valeur ' C'est la qu'une erreur va etre génére si la TextBox contient autre chose que des chiffres LargeurBoite = CInt(Me.txtLargeurBoite.Text) Exit Sub 'Message d'erreur ErrLargeurBoite: InfoBulle.Show("La largeur de la boite ne doit contenir que des chiffres", txtLargeurBoite, 0, -40, 2000) Me.txtLargeurBoite.Text = Nothing End Sub
PS: en moins sympa mais plus légé tu peut faire ceci
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23 Private Sub txtLargeurBoite_Validated(ByVal sender As Object, ByVal e As System.EventArgs) Handles txtLargeurBoite.Validated 'Si une erreur est présente alors on affiche le message d'erreur *voir en bas* On Error GoTo ErrLargeurBoite ' Si la textBox est vide on ne vérifie rien If (Me.txtLargeurBoite.Text = Nothing) Then Exit Sub End If 'Récupération et convertion de la valeur ' C'est la qu'une erreur va etre génére si la TextBox contient autre chose que des chiffres LargeurBoite = CInt(Me.txtLargeurBoite.Text) Exit Sub 'Message d'erreur ErrLargeurBoite: MessageBox.Show("La largeur de la boite ne doit contenir que des chiffres") Me.txtLargeurBoite.Text = Nothing End Sub
je pense qu'il ya une commande assez simpe avec Keypress.isletter mais je sais pas comment la manipuler..!!
Vous avez un bloqueur de publicités installé.
Le Club Developpez.com n'affiche que des publicités IT, discrètes et non intrusives.
Afin que nous puissions continuer à vous fournir gratuitement du contenu de qualité, merci de nous soutenir en désactivant votre bloqueur de publicités sur Developpez.com.
Partager