Page 1 sur 1

[R] Détection de la validité d'une valeur non connue

Posté : lun. 12 mai 2008 00:36
par genaille08
bonjour a tous
j'aurais besoin d'un peu d'aide pour une fonction que je n'ai pas trouvé dans rechercher
alors voila j'ai une suite de caractère que l'on nommera "x", je ne sais pas ce qu'est "x" étant donné que ce n'ai pas moi qui l'ai écrit. j'aurais voulu que mon script vérifie si "x" est valide en détectant si c'est une suite de nombre et non une suite de de lettre ou de caractère spéciaux. "x" est écrit dans une inputbox.
donc d'après moi j'ai sa

Code : Tout sélectionner

$x = InputBox ( "","vous pouvez personalisé votre temps" & @CRLF & "remplacez ici par la valeurs souhaité" & @CRLF & "exemple : 3,5 secondes => 3500 ms","ici"," ","-1","-1","-1","-1")
If $x ... Then
    MsgBox ( 0, "", "vous avez entré une mauvaise valeur" )
    Exit
EndIf
*

mais que dois-je mettre a la place des ...
merci

Re: [..] Détection de la validité d'une valeur non connue

Posté : lun. 12 mai 2008 01:42
par Tlem
Ceci devrait convenir :

Code : Tout sélectionner

While 1
    $x = InputBox("", "vous pouvez personnaliser votre temps" & @CRLF & _
            "placez ici par la valeurs souhaité" & @CRLF & _
            "exemple : 3.5 secondes", "3.5", " ", "-1", "-1", "-1", "-1")
    If @error Then ExitLoop

    If StringIsInt($x) Or StringIsFloat($x) Then
        ExitLoop
    Else
        MsgBox(0, "", "Vous avez entré une mauvaise valeur")
    EndIf
WEnd
Attention, la saisie de valeur non entière se fait avec le point "." et non la virgule ",".
Si vous ne souhaitez pas de saisie non entière, retirer :

Code : Tout sélectionner

Or StringIsFloat($x)
du code.

Re: [R] Détection de la validité d'une valeur non connue

Posté : lun. 12 mai 2008 11:19
par genaille08
merci