Mega Code Archive

 

Categories / VB.Net / Data Types

 

Convert Enum value back and forth

Public Enum Status As Integer    Late = -1    OnTime = 0    Early = 1 End Enum Public Module Example    Public Sub Main()         Dim number As Integer = -1         Dim arrived As Status = CType(Status.ToObject(GetType(Status), number), Status)     End Sub  End Module