VB6 Trouver un chiffre dans une chaine String
Eric
-
teebo Messages postés 33585 Date d'inscription Statut Contributeur Dernière intervention -
teebo Messages postés 33585 Date d'inscription Statut Contributeur Dernière intervention -
Bonjour,
j'ai besoin d'aide. Je dois trouver si une chaîne de caractères commence par un chiffre (0,1,2,3..) sans faire 10 fois le test.
Merci d'avance.
Eric
j'ai besoin d'aide. Je dois trouver si une chaîne de caractères commence par un chiffre (0,1,2,3..) sans faire 10 fois le test.
Merci d'avance.
Eric
4 réponses
-
Si tu fait une base de donnée sql avec tes chaînes de caractère tu effectuera des requêtes dessus et sql te donnera le résultat sans faillir.
Sinon tu mets un filtre sur ta chaîne pour extraire le premier caractère et tu teste sont type (ou sa valeur) si la valeur des 8premiers ou 4 premier (suivant le programme) est comptis entre 0 et 9 c que c un chiffre ce qui est en même temps leur code ACII je crois comme quoi y apo de confusion possible.-
Il n'y a pas de base SQL c'est une variable récuréré sur un controle txt que je veux tester.
Un utilisateur entre un mot qui peut contenir mais pas commencer par un chiffre.
je dois faire:
variable = left(variable,1) ' pour isoler le premier caractère
If Val(variable) ... et un test pour savoir si c'est un nombre (reste à définir comment mais en réflaichissant je vais trouver).
Ok mais j'ai le vague souvenir de
If left(variable,1) is numeristic ...
biensure ça marche pas. j'ai posé la question en espérant une réponse de ce type.
Merci pour ta contribution.
Eric
-
-
Vas ici
http://www.vbasic.org et tu pouras trouver un code qui te debloque
Une main attache un paquet et deux plusieurs.
Pù me dem bi Mboo tè si kwe -
Select case left(variable,1)
Case "1","2","3","4","5","6","7","8","9","0"
MsgBox "Sale utilisateur, lis la doc bordel de merde"
Case Else
MsgBox "Felicitation, tu sais la difference entre un chiffre et une lettre
End select
Dans le principe, mais il y a d'autre solutions aussi je pense...
. .
\_/ -
Sinon ca ca devrait aussi marcher
If variable Like "[0-9]*" then MsgBox "RTFM"
. .
\_/
