Příkaz Enum

Obsah
Index 🔎︎

# Příkaz Enum [VBA]

Definuje výčty nebo skupiny konstant nepatřící mezi UNO. Výčty usnadňují programování a zlepšují čitelnost kódu.

Tato funkce nebo konstanta je povolena příkazem Option VBASupport 1, který je umístěn před spustitelným programem v modulu.

### Syntaxe:

Enum

Object Statement block

End Enum

## Parametry:

Určitý výčet seskupuje hodnoty, které spolu vzájemně logicky souvisejí.

### Příklad:

           Option VBASupport 1
           Private Enum _WindowManager
               W1ND0WS = 1 ' Windows
               OS2PM = 2 ' OS/2 Presentation Manager
               MACINTOSH = 3 ' Macintosh
               MOTIF = 4 ' Motif Window Manager / Unix-like
               OPENLOOK = 5 ' Open Look / Unix-like
           End Enum
           Public Function WindowManager() As Object
               WindowManager = _WindowManager
           End Function ' <library>.<module>.WindowManager.XXX

Hodnoty výčtu jsou představovány datovým typem Long. K výčtům lze veřejně přistupovat pomocí funkcí. Názvy výčtů a jejich hodnot musí být jedineční v rámci knihovny a napříč moduly.

## Použití

Zobrazení skupiny konstantních hodnot WindowManager:

           Dim winMgr As Object : winMgr = <library>.<module>.WindowManager
           With winMgr
               Print .MACINTOSH, .MOTIF, .OPENLOOK, .OS2PM, .W1ND0WS
           End With

Související témata

Příkaz Const, konstanty

Příkaz Option VBASupport

Příkaz With