Mega Code Archive

 

Categories / VB.Net / Data Types

 

Combine the flag enum values

<FlagsAttribute()> _     Enum Colors         Red = 1         Green = 2         Blue = 4         Yellow = 8     End Enum  Public Module Example    Public Sub Main()         Dim myColors As Colors = Colors.Red Or Colors.Blue Or Colors.Yellow         Console.WriteLine("myColors holds a combination of colors. Namely: {0}", myColors)     End Sub  End Module