Data Types VB.Net

 Public Enum Pets As Integer
   None = 0
   Dog = 1
   Cat = 2
   Bird = 4
   Rodent = 8
   Reptile = 16
   Other = 32
End Enum
Public Module Example
   Public Sub Main()
    Dim familyPets As Pets = Pets.Dog Or Pets.Cat
    Console.WriteLine("Pets: {0:G} ({0:D})", familyPets)
    End Sub 
End Module