[vb6] array associativi?

[wallrider]

è possibile creare un'array associativo?
Cioè vorrei creare un array "arr" di cui posso ottenere il valore di arr("uno") invece di arr(1)...
'pito?

[Sypher]

lo puoi fare con una Collection

[wallrider]

ho cercato su programmazione ma non ho trovato nulla sulle collection...

[Sypher]

sono semplici ti faccio un esempio

Private Sub Form_Load()
 Dim coll As New Collection
 
 coll.Add "primo", "uno"
 coll.Add "secondo", "due"
 coll.Add "terzo", "tre"
 
 trezoelemento = coll("tre")
 MsgBox trezoelemento 
End Sub

[wallrider]

while 1>0
   :mavieni: 
loop

[Sypher]

while 1>0
   :mavieni: 
wend

:gren:

[wallrider]

Un'ultima cosa:
se io volessi riempire una list con delle coppie identificatore/valore tratte dall'oggetto coll che mi hai dato te?
Cioè:
se io ho una coll così riempita
coll.Add "primo", "uno"
coll.Add "secondo", "due"
coll.Add "terzo", "tre"
come posso ottenere una list come nell'allegato(naturalmente gli indici "primo","secondo" ecc non li conosco a priori...)?

[Sypher]

non credo si possano leggere i valori delle chiavi...o almeno non sono riuscito a farlo!