Collection VBA : liste de clés

Question

Après avoir ajouté des valeurs à la collection VBA, existe-t-il un moyen de conserver la liste de toutes les clés ?

Par exemple

Dim coll as new  Collection
Dim str1, str2, str3
str1="first string"
str2="second string"
str3="third string"
coll.add str1, "first key"
coll.add str2, "second key"
coll.add str3, "third key"

Je sais comment conserver la liste des chaînes :

first string
second string
third string

Encore une fois : existe-t-il un moyen de conserver les clés ?

first key
second key
third key

Note : J'utilise VBA dans AutoCAD 2007.

Answer 1

Vous pouvez facilement itérer votre collection. L'exemple ci-dessous concerne la collection spéciale Access TempVars, mais fonctionne avec n'importe quelle collection ordinaire.

Dim tv As Long
For tv = 0 To TempVars.Count - 1
    Debug.Print TempVars(tv).Name, TempVars(tv).Value
Next tv