ENUM...END ENUM

 
語法

        ENUM Identifier

        EnumeratorList

        END ENUM

 

操作

        宣告一個列舉。

  • Identifier 列舉名稱。
  • EnumeratorList 所有列舉的成員,包含額外的賦予值。

 

說明

        ENUM指令用來宣告常數列舉(Enumeration)。列舉值必須被宣告在所有程序外,也就是全域宣告,而且只能公共存取。列舉成員可以使用=賦予其列舉值。如果列舉的第一個成員沒有賦予列舉值,則列舉值為0。其餘列舉成員如果沒有賦予值,則其列舉值會是前一個列舉值加1。下面的例子顯示如何使用ENUM指令。使用時在列舉名稱跟列舉成員中間使用”.”運算元來存取其列舉值。下面例子顯示如何使用ENUM指令。

 

範例

Enum Color
    Red
    Yellow =
3
    Blue =
1
    Green
End Enum

Sub Main()
   
Debug "Enumerator Red = ", Color.Red, CR
   
Debug "Enumerator Yellow = ", Color.Yellow, CR
   
Debug "Enumerator Blue = ", Color.Blue, CR
   
Debug "Enumerator Green = ", Color.Green, CR
End Sub