Enum Class provides the base class for enumerations
Public Enum Status As Integer Late = -1 OnTime = 0 Early = 1 End Enum Public Module Example Public Sub Main() Dim status As Status = Status.OnTime Console.WriteLine("Arrival Status: {0} ({0:D})", status) End Sub End Module