Utilisation de la fonction split

Utilisation de la fonction split - VB/VBA/VBS - Programmation

Marsh Posté le 14-03-2005 à 16:29:01    

Bonjour,
 
je cherches un moyen de compter le nombre de sous-chaînes retournées par la fonction Split.
 
Je m'explique :
 
- j'ai une variable rep = c:\tmp\srep1\srep2\...
- j'utilise la fonction split pour qu'elle me retourne le nom de chaque répertoire : spliter = split(rep,"\",-1,1)
cette fonction me retourne comme resultat :
spliter(0)=c:
spliter(1)=tmp
spliter(2)=srep1
spliter(3)=srep2
 
sauf que ma variable rep peut comporter beaucoup plus de répertoire
c'est pourquoi j'aimerais compter le nombre de sous-chaînes retournées.
 
merci
 


---------------
KARON
Reply

Marsh Posté le 14-03-2005 à 16:29:01   

Reply

Marsh Posté le 14-03-2005 à 16:36:21    

MsgBox "Nombre de sous-chaines : " & CStr(UBound(spliter) + 1)


Message édité par Arjuna le 14-03-2005 à 16:37:03
Reply

Marsh Posté le 14-03-2005 à 17:27:23    

Merci beaucoup Arjuna
 
Dans mon utilisation j'ai enlevé + 1 car j'avais le message suivant :
indice en dehors de la plage.


---------------
KARON
Reply

Marsh Posté le 14-03-2005 à 17:37:01    

Ben oui, le +1, c'est pour avoir le nombre de ligne (et elles commence à 0, donc faut +1) mais sinon, UBound() retourne la borne maximale du tableau (et LBound() la borne minimale.
 
Perso, quand je parcours un tableau (en supposant évidement qu'il n'y a pas de trous dans les indices), je fais toujours :
 
For i = LBound(monTableau) to UBound(monTableau)
   monTableau(i) ...
Next
 
Ainsi, quelque soient les bornes, ce script fonctionne :)

Reply

Sujets relatifs:

Leave a Replay

Make sure you enter the(*)required information where indicate.HTML code is not allowed