Discussion :

[deaqu1]

Je récupére dans une string une donnée que j'écris dans une textbox, je voudrais tester si dans ce champs il y a des chiffre pour mettre un message d'erreur...
Y a t'il une fonction pour voir si c'est le cas?
MERCI

[HookerSeven]

Salut,

Oui il y a ce test en autres :

Code :

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

1
2
3
4
5
If IsNumeric (Me.ZoneText) then
'Condition True
Else
'Condition False
End if

[deaqu1]

C'est pas exactement ca que je veux, je marque par exemple toto dans mon champs et si je marque toto2 LA CA IRAI PAS...
Dans le meme genre que is numérique mais plutot "istext"
...

[DMboup]

et comme ca

Code :

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

1
2
3
4
5
6
7
8
9
 
Dim i as Integer
 
For i=1 to len(Champ)
    if isnumeric(Mid(Champ, i, 1)) then
         msgbox ("Numérique trouvé"& (Mid(Champ, i, 1)))
          exit
     End if
Nxet i

[deaqu1]

Ok ca marche pour moi!