<Flags()> Enum Number
one
two
three
End Enum
Public Enum Number
one = 1
two = 2
three = 1
End Enum
Dim x as Number = Number.One Or Number.Two
If (x And Number.One) = Number.One Then 'Enum contains 1 so True
Public Structure Card
Dim firsttype As Number
Dim secondtype As Number
End Structure