Enum [typename [ Explicit ] ]

symbolname [= expression] [, ...]
...

End Enum

typename
symbolname
expression
Explicit

Enum, short for enumeration, declares a list of symbol names that correspond to discrete values. If no initial value is given, the first item will be set to 0. Each subsequent symbol has a value one more than the previous unless expression is given.

Symbols may be each on their own line, or separated on a single line by commas.

An Enum is a useful way of grouping together a set of related Constants. A symbol can be accessed like constant, e.g: a = symbolname. But if the name clashes with another symbol, it must be resolved using typename.symbolname. This resolution method is always required if you make the enum Explicit.

An Enum can be passed as a user defined type to Overloaded operator functions.

Enum MyEnum
    option1 = 1
    option2
    option3
End Enum

Dim MyVar As MyEnum

MyVar = option1

Select Case MyVar
    Case option1
        Print "Option 1"
    Case option2
        Print "Option 2"
    Case option3
        Print "Option 3"
End Select

• Not available in the -lang qb dialect unless referenced with the aliases __Enum and __Explicit.
  
  
  

• New to FreeBASIC
  
  

• Const
  
• Operator