Istruzione Enum [VBA]

Definisce le enumerazioni o i gruppi di costanti non UNO. Un'enumerazione è un elenco di valori che facilita la programmazione e rende semplice la revisione logica del codice.

Questa costante, funzione od oggetto viene abilitata con l'istruzione Option VBASupport 1 posizionata prima del codice eseguibile del programma all'interno del modulo.

Sintassi:

Sintassi dell'istruzione Enum


       Enum list_name
           ' Object Statement block
       End Enum ' list_name

Parametri:

All'interno di un'enumerazione specificata, sistema insieme i valori che si relazionano logicamente uno all'altro.

Esempio:


       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

I valori enumerati sono resi col tipo Long. Le funzioni Basic sono metodi di accesso pubblici alle enumerazioni. I nomi delle enumerazioni e i nomi dei valori devono essere univoci all'interno di una libreria e tra i moduli.

Uso:

Mostra i valori raggruppati delle costanti WindowManager:


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

Le enumerazioni possono essere estese ad altri tipi di dati utilizzando le definizioni di istruzione Type. Richiamare script Python da Basic ne illustra il meccanismo.

Istruzione Const, costanti

Istruzione Option VBASupport

Istruzione With