Binaryworld - Duplicate the SET operating system command ... [ VB.net -> Windows ]

The Environment.GetEnvironmentVariables property returns the list of all the environment variables, as an IDictionary object. If you want to display them sorted by their name, as the SET command does at the prompt, you need the following tricky code:

Click here to copy the following block

' Get all the variables, as an IDictionary object
Dim vars As IDictionary = Environment.GetEnvironmentVariables
' moves all the keys into an array
Dim keys(vars.Count - 1) As Object
vars.Keys.CopyTo(keys, 0)

' sort the Keys array
Array.Sort(keys)

' display all environment variables, sorted by keys
Dim key As String
For Each key In keys
Console.WriteLine("{0}={1}", key, vars(key))
Next