LibreOffice 25.2 žinynas
Aprašykite išvardijimų arba UNO konstantų grupes. Išvardijimas yra reikšmių sąrašas, palengvinantis programavimą ir kodo logikos sandarą.
       
       Enum list_name
           ' Object Statement block
       End Enum ' list_name
    Išvardijinų sąraše surašykite reikšmes, kurios logiškai susijusios viena su kita.
       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švardijamos reikšmės pateikiamos Ilgasis duomenų tipui. Pagrindinės funkcijos viešai prieina prie išvardijimų. Išvardijimų vardai ir reikšmių pavadinimai bibliotekoje ir moduliuose turi būti unikalūs.
Rodyti „WindowManager“ sugrupuotas konstantų reikšmės:
       Dim winMgr As Object : winMgr = <library>.<module>.WindowManager
       With winMgr
           Print .MACINTOSH, .MOTIF, .OPENLOOK, .OS2PM, .W1ND0WS
       End With
    Išvardijimai gali būti išplėsti į kitus duomenų tipus naudojant Tipo sakinys apibrėžimą. Kreipinys iš „Basic“ į „Python“ skriptus iliustruoja šį mechanizmą.