LibreOffice 7.4 Hjelp
Definer oppregninger eller ikke-UNO konstantgrupper. En oppregning er en verdiliste som letter programmering og forenkler kodelogikkgjennomgang.
Enum list_name
' Object Statement block
End Enum ' list_name
Innenfor en gitt oppregning, sett sammen verdier som logisk forholder seg til hverandre.
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 ' ..WindowManager.XXX
Oppregnede verdier gjengis til Long datatype. Grunnleggende funksjoner er offentlige tilganger til oppregninger. Enumerasjonsnavn og verdinavn må være unike i et bibliotek og på tvers av moduler.
Vis WindowManager grupperte konstantverdier:
Dim winMgr As Object : winMgr = ..WindowManager
With winMgr
Print .MACINTOSH, .MOTIF, .OPENLOOK, .OS2PM, .W1ND0WS
End With
Enumerations can be extended to other data types using Type statement definitions. Calling Python Scripts from Basic illustrates that mechanism.