Enum [typename [ Explicit ] ]

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

End Enum

typename
symbolname
expression
Explicit

Enum，枚举的缩写，声明与离散值对应的符号名称列表。如果没有给出初始值，则第一个项目将被设置为0.除了给出expression 之外，每个后续符号的值都比前一个值多一个。

符号可以各自在自己的行上，或者以单行以逗号分隔。

一个Enum是一组将相关Const蚂蚁分组在一起的有用方式。可以像常数一样访问一个符号，例如：a = symbolname .但如果名称与另一个符号冲突，则必须使用typename .symbolname 解决。如果您使用枚举Explicit，则始终需要此解决方法。

在Extern ... End Extern块中声明的非ExplicitEnum将直接将其常量添加到父命名空间中，如C中所示，而不是独立地作为命名空间。它禁止typename .symbolname 访问风格，并且常量可能与父命名空间中的其他符号冲突。

可以将Enum作为用户定义的类型传递给Overload操作符函数。

Enum MyEnum
    option1 = 1
    option2
    option3
End Enum

Dim MyVar As MyEnum

MyVar = option1

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

• 显式枚举在-lang qb 方言中不可用，除非使用别名__Explicit引用。
  
  
  

• 新的FreeBASIC
  
  

• Const
  
• Operator