Vsebina
Kazalo 🔎︎

# Ukaz Enum [VBA]

Določite skupine ne-UNO konstant ali sezname vrednosti (enumeracije), ki poenostavijo programiranje in zagotavljajo preglednost kode.

Ta funkcija ali konstanta je omogočena z ukazom Option VBASupport 1, ki ga moramo vstaviti pred izvedljivo programsko kodo v modulu.

### Skladnja:

Enum

Object Statement block

End Enum

## Parametri:

V dani enumeraciji zberi vrednosti, ki so medsebojno logično odvisne.

### Primer:

           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

Številske vrednosti s seznama se upodobijo kot podatkovna vrsta Long. Funkcije Basic lahko dostopajo do seznamov vrednosti, vendar mora imeti vsak seznam vrednosti in vrednost edinstveno ime v knjižnici in modulih.

## Raba:

Prikaz vrednosti konstant WindowManager po skupinah:

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

Podobne teme

Ukaz Const, konstante

Ukaz Ukaz Option VBASupport

Ukaz With