Wie greife ich Sammlung Schlüssel während der For Each in VB.net?

Question

Ich habe einige Code wie folgt:

Dim col As Collection = New Collection
col.Add(value1, "key1")
col.Add(value2, "key2")

' later...
For Each item As String In col
    ' want to get valueX and keyX here; currently, "item" holds the value
Next

Wie kann ich sowohl der Wert und die Schlüssel in der Schleife? Vielleicht gibt es eine andere Klasse, die dies einfacher?

macht

Answer 1

Ich würde ein allgemeines Wörterbuch verwenden ...

 Imports System.Collections.Generic  'at top of file

    Dim col As New Dictionary(Of String, Of Object) 'or whatever type
    col.Add("key1", value1)
    col.Add("key2", value2)    

    For Each item as KeyValuePair(of String, Object) in col
           Console.WriteLine(item.key & ": " & item.value)
    Next