Mega Code Archive

 

Categories / VB.Net / Data Types

 

Get Enum value names

Public Enum Status As Integer    Unknown = -3    Late = -1    OnTime = 0    Early = 1 End Enum Public Module Example    Public Sub Main()         Dim names() As String = [Enum].GetNames(GetType(Status))         Console.WriteLine("Members of {0}:", GetType(Status).Name)         Array.Sort(names)         For Each name In names            Dim status As Status = CType([Enum].Parse(GetType(Status), name),                                          Status)            Console.WriteLine("   {0} ({0:D})", status)         Next     End Sub  End Module