vb.net - VB.netのForEach中にコレクションキーにアクセスするにはどうすればよいですか？

Question

私はこのようなコードを持っています：

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

ループ内で値とキーの両方を取得するにはどうすればよいですか？たぶん、これを簡単にする別のクラスがありますか？

Answer 1

一般的な辞書を使用します...

 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