Valeur numérique sur TextBox

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:

---

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 :mrgreen:

Merci.

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 :aie:.

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

Code:

---

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

---

Bonjour.

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

Code:

---

1 2 3 4

If Char.IsDigit(e.KeyChar) Then e.Handled = False End If

---

C'est plus simple :ccool::ccool:

A ce moment autant écrire

Code:

---

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

---

;)

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 :cry: 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 :(

Citation:

---

StormimOn, Charaf Eddine, nabilfaouzi : ...

---

Et le '.' ou la ',' décimale,
et le backspace
et la touche suppr.

Citation:

---

Envoyé par spamitovic

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

---

C'est parce que le test est dans le mauvais "sens" (j'ai corrigé au passage). Mais tu aurais pu, sinon dû, corriger de toi même ;)

Citation:

---

Envoyé par Graffito

Et le '.' ou la ',' décimale,
et le backspace
et la touche suppr.

---

Je ne parlais que de la partie concernant la vérification sur le fait que le caractère soit un chiffre ou non. Après il y a bien sûr d'autres considérations (cf. ton lien) et j'aurais du le mentionner. Sauf peut être pour le point ou la virgule car il n'en est pas fait mention dans ce sujet, la saisie étant entière à priori.

Code:

---

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

---

Cela ne marche pas s'il n'est pas à l'intérieur d'un With. Mais je l'ai remplacé par :

Code:

---

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

---

Citation:

---

Envoyé par Graffito
Et le '.' ou la ',' décimale,
et le backspace
et la touche suppr.

---

Il a raison et je l'ai mentionné pour le Backspace car il ne marche pas ni dans le code de StormimOn ni celui de nabil.

Citation:

---

Envoyé par spamitovic

Cela ne marche pas s'il n'est pas à l'intérieur d'un With

---

Réflexe de C# :aie:

Citation:

---

Envoyé par spamitovic

car il ne marche pas ni dans le code de StormimOn ni celui de nabil.

---

Normal puisque ce n'était pas testé. Je ne faisais que simplifier le code donné au dessus de mon post. Mais sans avoir précisé ceci, il est vrai que c'était maladroit ...

Le lien donné par Graffito doit normalement répondre à ton besoin.

Perso j'utilise un mix de char.IsDigit et char.IsControl comme ceci :

Code:

---

1 2 3

If Not Char.IsDigit(e.KeyChar) and Not Char.IsControl(e.KeyChar) Then e.Handled = True End If

---

Merci à tous pour votre soutien :mrgreen:. Tous vos codes ont été de grande importance pour moi :mouarf:

Le code de Sankasssss répond à mes besoins.

Merciiiiiiiiiiiiiiiiiiiiiiiiiiii :mrgreen: