Data Type VB.Net Tutorial

Public Enum AccessLevel
    Level1
    Level2
    Level3
    AliasLevel1 = Level1
    AliasLevel2 = Level2
    AliasLevel3 = Level3
    AliasLevel4 = Level3
End Enum
public class Test
   public Shared Sub Main
        Dim access_level As AccessLevel = AccessLevel.Level1
        Console.WriteLine(access_level.ToString())
        Console.WriteLine(AccessLevel.Level1.ToString())
        Console.WriteLine(AccessLevel.Level2.ToString())
        Console.WriteLine(AccessLevel.Level3.ToString())
   End Sub
End class
Level1
Level1
Level2
AliasLevel3