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

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