controle dans textBox

Bonjour.
J'ai une appli qui utilise juste les decimals.
Je veux que,si l'utilisateur rentre un ou des caracteres, qu'il soit prevenu par msgBox de ne pas rentrer de caractere.
C'est tout bete mais je n'y arrive pas.
Je voulais dans un premier temps, convertir en entier (voir codes suivants) mais toujours rien

Code:

---

1 2 3 4 5 6 7 8

Dim s as String   Dim i as Integer   s= InputBox ("Test", "Taper un nombre")   i=Integer.Parse(S)

---

Code:

---

1 2 3 4 5 6

Dim i As Integer   Dim s As String= "12"   i=CType(s,Integer)

---

Merci de m'aider.
Cordialement.

Tu es en Dotnet 2.0 ?

Dans ce cas, tu as le contrôle MaskedTextBox pour forcer la saisie de l'utilisateur.

ou tu peux utiliser de ASCII :P

Citation:

---

Envoyé par Cardi

Tu es en Dotnet 2.0 ?

Dans ce cas, tu as le contrôle MaskedTextBox pour forcer la saisie de l'utilisateur.

---

Ceci est bien adapté pour mon problème
J'ai regarder des tuto et je ne sais toujours pas l'utiliser
Je me sert beaucoup de ce site http://plasserre.developpez.com/v3-4.htm

Citation:

---

Envoyé par More

ou tu peux utiliser de ASCII

---

pas compris ta solution
Je converti en ASCII?

Sinon j'ai trouver la solution mais je comprend pas le code donc pour moi ce n'est pas interressant (le code est tester et fonctionne)

Code:

---

1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18

Try ' récupération du salaire nombre = Integer.Parse(Box_convertir.Text) ' il doit être >=0 If nombre < 0 Then Throw New Exception("") End If Catch ex As Exception ' msg d'erreur Box_convertir.Text = "0" MessageBox.Show(Me, "Salaire incorrect", "Erreur de saisie", MessageBoxButtons.OK,MessageBoxIcon.Error) ' focus sur champ erroné Box_convertir.Focus() ' sélection du texte du champ de saisie Box_convertir.SelectAll() ' retour à l'interface visuelle Return End Try 'try-catch

---

Comprend pas try, catch,Throw New Exception

Merci

Citation:

---

Envoyé par Cardi

Tu es en Dotnet 2.0 ?

---

oui

Bonjour
Autre solution dans l'événement KeyPress

Code:

---

1 2 3 4 5

dim Valide = '123456789,' if Valide.IndexOf(e.keychar) < 0 then msgbox("caractères non valide") e.handled = true end if

---

La textbox n'accepteras que les chiffres et , .
Bon boulot8-)
Jean

Citation:

---

Envoyé par afrodje

Je veux que,si l'utilisateur rentre un ou des caracteres, qu'il soit prevenu par msgBox de ne pas rentrer de caractere.

---

utiliser la fonction isNumeric

Citation:

---

Envoyé par kajol

utiliser la fonction isNumeric

---

Je l'avais deja utilisé mais surement mal !
Donc ca marchais pas. :marteau:

Citation:

---

Envoyé par afrodje

Je l'avais deja utilisé mais surement mal !
Donc ca marchais pas. :marteau:

---

Code:

---

1 2 3 4

If IsNumeric(matextbox.Text) = False Then matextbox.Text = "" MessageBox.Show("Ce champ doit etre de type numerique", "Erreur", MessageBoxButtons.OK, MessageBoxIcon.Information) End If

---

comme ca normalement ca va bien fonctionner

bonne chance

Citation:

---

Envoyé par kajol

Code:

---

1 2 3 4

If IsNumeric(matextbox.Text) = False Then matextbox.Text = "" MessageBox.Show("Ce champ doit etre de type numerique", "Erreur", MessageBoxButtons.OK, MessageBoxIcon.Information) End If

---

comme ca normalement ca va bien fonctionner

bonne chance

---

Merci.
Je te dirai ca demain matin.

Citation:

---

Envoyé par kajol

Code:

---

1 2 3 4

If IsNumeric(matextbox.Text) = False Then matextbox.Text = "" MessageBox.Show("Ce champ doit etre de type numerique", "Erreur", MessageBoxButtons.OK, MessageBoxIcon.Information) End If

---

---

Ok ca marche
Petite modif sur mon code.
Comme j'utilise le contenu de matextbox apres(multiplication etc...), si je met matextbox.text = "", il y aura probleme donc je le met à 0 (matextbox.text = "0").
Merci.

Citation:

---

Envoyé par afrodje

Ok ca marche
Petite modif sur mon code.
Comme j'utilise le contenu de matextbox apres(multiplication etc...), si je met matextbox.text = "", il y aura probleme donc je le met à 0 (matextbox.text = "0").
Merci.

---

salut
je veut savoir c'est quoi le probeleme que tu a 8O

petite remarque

Code:

---

matextbox.text = ""

---

ce ligne de code va garder ta zone de texte(matxtbox) vide c'est tous

;)

Citation:

---

Envoyé par kajol

salut
je veut savoir c'est quoi le probeleme que tu a 8O

petite remarque

Code:

---

matextbox.text = ""

---

ce ligne de code va garder ta zone de texte(matxtbox) vide c'est tous

;)

---

Je suis tout a fais d'accord avec toi.
Mais le code que tu m'a donner

Code:

---

If IsNumeric(matextbox.Text) = False Then

---

est un test pour voir si matextbox est un numerique.
Mais si condition est faux alors matextbox est vide ( on est toujours d'accord ;) ).
Comme j'utilise ce nombre (donc vide) et je le multiplie ou divise ou autre, alors ca me genere une erreur.
Alors si je met 0, ca marche (parce que null n'est pas égale à 0 !!)

J'espere que tu as compris ;)

@+

Bonsoir,

J'ai un problème un peu identique au tien (voir mon message posté).
J'ai peu le résoudre de la même façon que toi. Mais je rencontre un autre souci.

Avec cette méthode, je ne calcule pas les nombres décimaux. Je pense que la virgule ne peut pas permettre les multiplications, divisons et autres.

Quelqu'un peut-il m'aider?

Charles-Elie

Perso, dans mon projet, il n'y a que des décimals. Je fais plein d'opération (avec multiplication et addition)

Je vois pas pourquoi toi, tu n'arriverai pas.
Peut etre que ta mal déclarer ta variable de sorti...:(