Page 1 sur 1
[R] Vérification nombre dans Input
Posté : dim. 29 mars 2009 13:55
par touslesmatins
Bonjour,
je cherche à vérifier dans un input que les données inscrites soient bien des chiffres et non un melanGe de chiffres et de lettres ou des lettres. Le code ne fait pas la difference.
► Afficher le texte
Code : Tout sélectionner
$nombre = InputBox("Tutorial", "Entrez un nombre :")
$p=IsNumber($nombre)
If $p >= 0 Then
MsgBox(0,"1", "")
Else
MsgBox(0,"E", "")
EndIf
J'ai trouvé ce bout de code, mais retourne toujours la meme chose...
► Afficher le texte
Code : Tout sélectionner
$nombre = InputBox("Tutorial", "Entrez un nombre :")
If (($nombre >= 0) AND ($nombre <= 1000000)) Then
MsgBox(0,"Tutorial", "Ce nombre est compris entre 0 et 1000000.")
Else
MsgBox(0,"Tutorial", "Ce nombre n'est pas compris entre 0 et 1000000.")
EndIf
Une idée ?
Merci
Re: [..] Vérification nombre dans Input
Posté : dim. 29 mars 2009 14:53
par jbnh
Salut, jette un oeil
ici.
Re: [..] Vérification nombre dans Input
Posté : dim. 29 mars 2009 15:19
par Iste
Le plus simple est de demander directement a l'input de ne prendre que des nombre
Code : Tout sélectionner
#include <EditConstants.au3>
GUICtrlCreateInput ( "text", left, top , width , height ,$ES_NUMBER)
Re: [..] Vérification nombre dans Input
Posté : dim. 29 mars 2009 18:13
par touslesmatins
Merci.
Pour le lien que vous m'indiquez, cela fait 24h que je le lis en long et en large. J'avais avant de poster cette demande fait des recherches et dans la doc et sur le net. Je vois bien que cela correspond mais comment l'utiliser...
► Afficher le texte
Code : Tout sélectionner
InputBox("coucou", "Nombre...", "...", "", _
200, 150, 410, 300)
Apres cet inputbox je souhaite verifier si ce qui est écrit est un nombre.
Personne pour une aide plus approfondie ...
Et merci Iste, mais je pense que ta soluce n'est valable qu'avec les GUI, ce qui n'est pas mon cas.
Re: [..] Vérification nombre dans Input
Posté : dim. 29 mars 2009 18:25
par touslesmatins
Complément...
J'ai esayé ceci...
mais, meme resultat le check ne se fait pas...
Bon dimanche
Re: [..] Vérification nombre dans Input
Posté : dim. 29 mars 2009 18:32
par Voodoo
Code : Tout sélectionner
$nombre = InputBox("Tutorial", "Entrez un nombre :")
If (StringIsInt($nombre) or StringIsFloat($nombre)) Then
MsgBox(0,"1", "")
Else
MsgBox(0,"E", "")
EndIf
Attention, InputBox return un String donc il faut utiliser les fonctions String pour tester...
Re: [..] Vérification nombre dans Input
Posté : dim. 29 mars 2009 18:42
par ani
Passe par un Number au lieu de IsNumber
Code : Tout sélectionner
$nombre = InputBox("Tutorial", "Entrez un nombre :")
If Number($nombre) Then
MsgBox(0,"Vous avez choisis un chiffre", $nombre)
Else
MsgBox(0,"Vous avez choisis une lettre", $nombre)
EndIf
bonne continuation
Re: [R] Vérification nombre dans Input
Posté : dim. 29 mars 2009 20:35
par touslesmatins
Merci à vous
cela me convient.
Re: [R] Vérification nombre dans Input
Posté : jeu. 02 avr. 2009 18:23
par ani
Un oubli de ma part mais pourquoi isnumber ne retourne pas ?
exemple
Code : Tout sélectionner
Dim $TheForm
$TheForm = 5
If IsNumber($TheForm) Then
If $TheForm < 1 Or $TheForm > 10 Then
MsgBox(0,"","Please enter a number between 1 and 10.")
Else
MsgBox (0,"","Thank you.")
EndIf
Else
MsgBox(0,"","Please enter a numeric value.")
EndIf
Maintenant mettez la valeur de $TheForm entre guillemet (simple ou double).
Hooo il nous dit que ....
Voilà pourquoi l'inputbox ne fonctionnera pas (y a peut etre une astuce mais la seul trouvé c'est number
)
Re: [R] Vérification nombre dans Input
Posté : jeu. 02 avr. 2009 19:47
par touslesmatins
merci