Couper le texte en 2

Question

SAlut

Dans un textBox, il y a un string

"c:windowsureau
ewapp.txt"

je voudrais faire une recherche de la droite vers la gauche sur ""
et mettre :
dans le textbox2
     "c:windowsureau
ew"
et le textbox3
     "app.txt"

Si vous avez un truc hyper simple je suis preneur
Merci

@+

Bendes · Answer

J'pense qu'en faisant une boucle While et en utilsant la fonction MID, ça devrait t'aider (c pas compliquer)

H@lloWin___HiA · Answer

Pourrait tu preciser, et faire un exemple, Merci
Je débute en VB

int19h · Answer

Je pense qu'il veut "sortire" le nom contenu dans la TextBox.

Exemple :
Text1 = "c:windowscommandedit.com"

z$=Text1
do while instr(z$,"")
z$=mid$(z$,instr(z$,"")+1)
loop

' Ici on a dans z$ le nom du fichier.
' soit z$="edit.com

a+

H@lloWin___HiA · Answer

SAlut Int19h

et merci pour ta réponse expicite

@+

int19h · Answer

Fonction plus rapide, sans boucle :

z$ = "c:/windows/command/edit.com"
Form1.Caption = Mid$(z$, InStrRev(z$, "/") + 1)

Note : Changer les "/", il faut celui sur la touche "8". Si non, le forum bouffe le craracter...

H@lloWin___HiA · Answer

Merci Int19h

Couper le texte en 2

6 réponses

Discussions similaires