VB.net, Mengambil Kembali Nama key Pada Enumerasi

Module Module1

    'This example to calling back the name of declared enum

    ' Get the name of enumerate color names

    'sample by: Klampok_Child

    Sub Main()

        For Each color In [Enum].GetNames(GetType(ConsoleColor))

            Console.WriteLine(color)

            System.Threading.Thread.Sleep(200)

        Next

    End Sub

End Module