Data Types VB.Net

Enum BoilingPoints
        Celsius = 100
        Fahrenheit = 212
    End Enum 
Public Module Example
   Public Sub Main()
        Dim boiling As Type = GetType(BoilingPoints)
        For Each s In  [Enum].GetNames(boiling)
            Console.WriteLine("{0,-11} = {1}", s, [Enum].Format(boiling, [Enum].Parse(boiling, s), "d"))
        Next s
    End Sub 
End Module