Fonction VB renvoyant un tableau

trolanne Messages postés 1 Date d'inscription mercredi 30 juillet 2003 Statut Membre Dernière intervention 29 septembre 2003 - 29 sept. 2003 à 19:57
Renfield Messages postés 17287 Date d'inscription mercredi 2 janvier 2002 Statut Modérateur Dernière intervention 27 septembre 2021 - 29 sept. 2003 à 22:28
J'ai créé une appli Access XP et j'ai besoin de stocker toutes les positions d'un caractère dans une chaîne de caractère. J'ai créé la fonction mais lorsque je veux affecter le résultat à un tableau, le "compilateur" VBA me dit que je n'ai pas le droit d'affecter à un tableau.

Voici ce que je veux faire :
chaine = "01#02#03#toto;"

tableau = ArrayOfString(chaine,'#')

et je devrais avoirtableau(0) 3, tableau(1) 6, tableau(2) = 9)

Mais ça ne marche pas. Donc comment puis-je faire ?

Merci par avance à ceux (et celles) qui pourront me répondre.

1 réponse

Renfield Messages postés 17287 Date d'inscription mercredi 2 janvier 2002 Statut Modérateur Dernière intervention 27 septembre 2021 74
29 sept. 2003 à 22:28
Utilises la commande Split :

Dim Tableau() as String

chaine = "01#02#03#toto;"

Tableau = Split ( chaine , "#" )



et tu aura
tableau(0) 3, tableau(1) 6, tableau(2) = 9)

By Renfield

[mailto:thomas_reynald@msn.com thomas_reynald@msn.com]

Aucune touche n'a ete blessee lors de la saisie de ce texte.......... ;)
0
Rejoignez-nous