有没有一种方法可以对vb.net中的字典中的键进行排序

Question

http://msdn.microsoft.com/en-us/library/xfhwa508%28v=vs.110%29.aspx

Say i want to to do for each on each key and I want keys that are alphabetically smaller like "BR" to show up first.

Is there a way to do so?

Or is dictionary strictly key object pair?

Answer 1

I found this link as a solution

http://www.dotnetperls.com/sort-dictionary-vbnet

Basically insert the keys into a list and then sort that list and then enumerate based on that list.

I copy paste the sample code

Sub Main()
' Create Dictionary with string keys.
Dim dict As New Dictionary(Of String, Integer)
dict.Add("dog", 0)
dict.Add("cat", 1)
dict.Add("mouse", 5)
dict.Add("eel", 3)
dict.Add("programmer", 2)

' Get list of keys.
Dim keys As List(Of String) = dict.Keys.ToList

' Sort the keys.
keys.Sort()

' Loop over the sorted keys.
Dim str As String
For Each str In keys
    Console.WriteLine("{0} -> {1}", str, dict.Item(str))
Next
End Sub