Mega Code Archive
Assign value to Enum elements
Public Enum AccessLevel
Clerk = 10
Supervisor
Administrator = -1
End Enum
public class Test
public Shared Sub Main
Dim m_AccessLevel As AccessLevel
m_AccessLevel = AccessLevel.Supervisor
End Sub
End class