Discussion :

[partouchefrancis]

bonjour

en vb.net j'utilise un text box dans lequel je dois saisir un nombre (double) si je mets dans le code du text box

Code :

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

if isNuméric(Textbox.Text)=false then msgbox("entrez seulement des chiffres)

dès que je rentre la première lettre du mot que je veux entrer(par exemple le a de are ) il m'affiche le msgbox ; si je rentre 12 il ne dit rien mais si je rentrer 12.5 dès que je tape le . il m'affiche la msgbox

si je procède autrement que je ne mets pas le if et que je créee un bouton calcule en disant à ce bouton le même if que précédemment , après avoir saisi dans le text box , si je tape 12 le bouton calcule ne dit rien si je dis 12.5 il affiche le msgbox d'erreur et même si je ne mets rien dans le text box il me m'affiche quand même la msgbox


quelqu'un peut il m'aider
a l'avance merci
cordialement

[ProgElecT]

Salut

FAQ VB.net
Comment ne saisir que des caractères numériques dans mon TextBox ?

[Phil Rob]

L'erreur de ta saisie se produit lorsque tu tapes le point. C'est donc que le séparateur décimal de ton système n'est pas le point mais la virgule. Tu ne drevais pas avoir d'erreur en tapant 12,5.
Mais ce n'est peut-être pas la meilleure façon de tester une saisie numérique ..., chaque programmeur souhaite que son programme fonctionne quelle que soit la configuration des paramètres régionaux du système.
Tu dois donc te documenter sur d'autres modes de contrôle des valeurs numériques.
Bon travail ...

[ProgElecT]

Salut

Ne serait il pas possible de faire Textbox.Text = Textbox.Text.Replace(".",",") dans l’événement textBox1_KeyDown

[Phil Rob]

Bien sûr ProgElecT, l'usage d'un Replace est tout-à-fait approprié. D'autant qu'il ne faut pas oublier que, quel que soit le réglage du séparateur décimal dans le système, dans VB le séparateur est le point et rien d'autre !!!
Cependant je ne le ferais pas sur un événement qui se produit à chaque touche pressée.
L'algorithme présenté au début consiste à vérifier que le contenu d'un TextBox est bien une valeur numérique (Single, par exemple).
Je ferais approximativement ceci (d'une pierre 2 coups : je vérifie et je prends la valeur) :

Code :

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

1
2
3
4
5
6
 
Try
ValeurReelleAConserver = CType(Replace(TextBox.Text, ",","."), Single)
Catch
msgbox("entrez seulement des chiffres")
End Try

SUITE ....

Il s'il faut faire ce traitement en réponse à un événement du TextBox, je choisirais l' événement Leave.

[MABROUKI]

bonjour

Il faut voir du coté de MaskedTextBox c'est plus facile avec un MaskedTextBox.Mask = "99.99" par exemple et
les events :

1/ MaskedTextBox_TypeValidationCompleted

2/ MaskedTextBox_MaskInputRejected

bon code...