Valeur numérique sur TextBox

**spamitovic** · 25/10/2009, 22h35

Bonsoir,

Pour ce qui est de VB6, il est simple d'obliger un usager de saisir que du chiffre sur un TextBox grâce à KeyAscii.
Mon soucis est avec Vb.net, mon textbox doit accepté que du chiffre et non pas des lettres ou autres symboles. J'ai mis ce code :

Code :

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

1
2
3
If Not IsNumeric(textbox1.text) then
MessageBox.Show("blablabla")
End if

Cela est parfait mais ce n'est pas ce que je cherche à faire. Même si l'usager clique sur une lettre, cette dernière ne sera pas écrite et aucun message ne doit s'afficher. Si c'est du chiffre alors c bon.

J'espère que j'étais clair dans mes explications

Merci.

**Graffito** · 25/10/2009, 22h53

Pas de solution directe via une propriété du TextBox.
Sinon : http://msdn.microsoft.com/fr-fr/library/ms229644.aspx
et je pense qu'il faut en plus désactiver le copier-coller

.

**nabilfaouzi** · 26/10/2009, 00h35

Mettez ça dans l'évenement keypress de ton textbox:

Code :

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

1
2
 
  If Asc(0) > Asc(e.KeyChar) Or Asc(9) < Asc(e.KeyChar) Then e.Handled = True

**Charaf Eddine** · 26/10/2009, 14h02

Bonjour.

Tu peux aussi mettre ça dans l'événement KeyPress de ton TextBox :

Code :

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

1
2
3
4
 
If Char.IsDigit(e.KeyChar) Then
            e.Handled = False
End If

C'est plus simple

**StormimOn** · 26/10/2009, 14h05

A ce moment autant écrire

Code :

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

e.Handled = Not Char.IsDigit(e.KeyChar)

**spamitovic** · 26/10/2009, 17h19

Merci à vous tous pour vos réponses.

La réponse de NabiFaouzi est celle que j'attends car son code oblige l'utilisateur de saisir que des NUMEROS dans mon TextBox

Par contre, il désactive le bouton Retour

c'est ce que je ne veux pas

Le code de CharafEddine et StormimOn oblige l'utilisateur de saisir des lettres et non pas des numéros