DictionaryのデータからFor Each文を使ってデータを取得する方法をご紹介します。
Dim dic As New Dictionary(Of Integer, String)
dic.Add(1, "りんご")
dic.Add(2, "バナナ")
For Each d In dic
Dim index As Integer = d.Key
Dim str As String = d.Value
Console.WriteLine(index & str)
Next
1りんご
2バナナ
For Each文でDictionaryのデータを全て取得できます。
dのデータ型が指定されていませんが、
KeyValuePairと言う構造体が自動的に指定され、
KeyやValueにアクセスする事ができます。
明示的に、
For Each kvp As KeyValuePair(Of Integer, String) In dic
と書いても同じ意味になります。
これでDictionaryからFor Eachを使って
データを取得できるようになりました。