[VBS] Convertir une chaine de char en tableau

Question

Bonsoir,
Je souhaite savoir s'il est possible en VBS de convertir une chaine de caractères en tableau? J'ai cherché mais rien trouvé, voici un petit exemple de ce que j'essaye de faire

DIM Char
DIM B

Char="ABCDEFGH"

'Manque la fonction pour convertir une chaine
'de caracteres en tableau

B = Char(4)

'Doit en théorie afficher "E"
WScript.Echo B

Le bout de code ne fonctionne pas et retourne une erreur "Type incompatible". J'aurais pu définir la varible Char comme etant un tableau mais dans mon script final ça ne peut pas fonctionner car j'utilise des fonctions qui ne fonctionne que sur des chaines de caractères.

Merci d'avance pour votre aide.

fiddy · Answer

Salut
Oui c'est possible, utilise la fonction Mid

DIM Char
DIM B

Char="ABCDEFGH"

'Manque la fonction pour convertir une chaine
'de caracteres en tableau

B = mid(char,5,1)

'Doit en théorie afficher "E"
WScript.Echo B

Rem's · Answer

Merci pour ta réponse, mais ce n'est pas tout à fait ce que je cherche à faire, en fait, je souhaite traiter une chaine de caractères lettre par lettre jusqu'à retrouver certains caractères (une extension de fichier quelconque, .XYZ).

En transformant ma chaine en tableau je pourrai ainsi faire via un for ou un do une comparaison de chaque caractères.

fiddy · Answer

Je ne comprends pas vraiment ce que tu veux précisément.
En tout cas, si tu veux récupérer l'extension d'un fichier :

toto="fichier.txt"

nombre=InStr(toto,".")
longueur=len(toto)
msgbox(right(toto,longueur-nombre))  

Cela te renverra "txt"

[VBS] Convertir une chaine de char en tableau

3 réponses

Discussions similaires

Newsletters