Aide trouver text svp

Signaler
Messages postés
50
Date d'inscription
mardi 8 janvier 2002
Statut
Membre
Dernière intervention
6 juillet 2003
-
Messages postés
2676
Date d'inscription
vendredi 28 juin 2002
Statut
Membre
Dernière intervention
13 janvier 2016
-
bonjour jai un probleme que certain seront surement a la hauteur pour me repondre!

dans un text numerique jai:

13 576 84 32 000 68 73 51 05 33 13 21 06 666

comment je peux faire pour faire ecrire les chiffre entre 576 et 666 dans un textbox ou richtextbox???

merci beaucoup si vous pouvez m'aider

jackky

4 réponses

Messages postés
2676
Date d'inscription
vendredi 28 juin 2002
Statut
Membre
Dernière intervention
13 janvier 2016
25
salut

a$ = "13 576 84 32 000 68 73 51 05 33 13 21 06 666"
textbox1.text = mid$(a$,instr(a$,"576")+4,instr(a$,"666")-instr(a$,"576 ")-5)

voila

ShareVB
0
Messages postés
50
Date d'inscription
mardi 8 janvier 2002
Statut
Membre
Dernière intervention
6 juillet 2003

merci de ton aide, ca marche quand je le fais de ta maniere,
mais jai un textbox1 pour faire aficher le texte entre le 576 et le 666 et jai le textbox2 qui contient le texte numerique

ex si je fais:

a$= textbox2 pour mettre tout le texte en variable
textbox1.text = mid$(a$,instr(a$,"576")+4,instr(a$,"666")-instr(a$,"576 ")-5)

quand je veux faire a$= textbox2 pour mettre tout le texte dans la variable ca marche pas?

merci si tu peux m'aider la dessus

jackky
0
Messages postés
50
Date d'inscription
mardi 8 janvier 2002
Statut
Membre
Dernière intervention
6 juillet 2003

ok c correct toute marche merci c super mais une question me chicotte encore c pourquoi le -5 a la fin?
0
Messages postés
2676
Date d'inscription
vendredi 28 juin 2002
Statut
Membre
Dernière intervention
13 janvier 2016
25
salut

en fait on pourrait ecrire :

mid$(a$,instr(a$,"576")+4,instr(a$,"666")-1-(instr(a$,"576 ")+4)

le instr(a$,"666") donne la position du premier 6 hors on veut la position du caractere d'avant donc on ajoute -1
le instr(a$,"576 ")+4 donne la position du 5 hors on veut la position du caractere apres l'espace apres 576 donc on ajoute +4

mid$ demande comme deuxième parametre la longueur à prélever donc : caractere du debut - caractere de fin

...-1-(...+4)=-5

voila

ShareVB
0