Vsebina

# Ukaz Enum [VBA]

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

To konstanto, funkcijo ali predmet omogočimo z ukazom Option VBASupport 1, ki ga moramo vstaviti pred izvedljivo programsko kodo v modulu.

### Skladnja:

           Enum list_name
               ' Object Statement block
           End Enum ' list_name

## 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

Številčenja lahko z definicijami ukazov Type razširite tudi na druge vrste podatkov. Za ilustracijo tega problema si oglejte Klicanje skriptov Python iz Basica.

Podobne teme

Ukaz Const, konstante

Ukaz Ukaz Option VBASupport

Ukaz With

Podprite nas!