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.
Enum
Object Statement block
End Enum
Parametri:
All'interno di un'enumerazione specificata, sistema insieme i valori che si relazionano logicamente uno all'altro.
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