Option Strict On <Flags> Public Enum MyValues As Integer AA = 1 BB = 2 CC = 4 DD = 8 End Enum Public Module modMain Public Sub Main() Dim Computer1 As MyValues = MyValues.AA Or MyValues.BB Console.WriteLine(Computer1.ToString()) End Sub End Module
AA, BB