Enum [typename [ Explicit ] ]

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

End Enum

typename
symbolname
expression
Explicit

Enum используется для перечисления, объявляя список имен символов, которые соответствуют дискретным значениям. Если начальное значение не присвоено, первому элементу будет присвоено 0. Каждый последующий символ имеет значение больше, чем в предыдущее, если expression не дано.

Символы могут быть каждый на своей строке, или на одной линии, разделенные запятыми.

Enum - это удобный способ группировки набора связанных Const(констант). К символу можно обращаться, как к константе, т.е: a = symbolname. Но если имя конфликтует с другим символом, это должно быть разрешено с помощью typename.symbolname. Этот метод будет обязательным, если вы сделаете enum Explicit.

Enum может передаваться как определяемый пользователем тип к Overload(перегруженным) операторам функций.

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

• Explicit Enum не доступно в диалекте -lang qb , но есть псевдоним __Explicit.
  
  
  

• Новое в FreeBASIC
  
  

• Const
  
• Operator