Contenido

# Instrucción Enum [VBA]

Definir enumeraciones o grupos constantes no UNO. Una enumeración es una lista de valores que facilita la programación y facilita la revisión de la lógica del código.

Esta constante, función u objeto se activa mediante la instrucción Option VBASupport 1, colocada antes del código ejecutable del programa en un módulo.

### Sintaxis:

           Enum list_name
               ' Object Statement block
           End Enum ' list_name

## Parámetros:

Dentro de una enumeración, encajan entre sí los valores que lógicamente se relacionan.

### Ejemplo:

           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

Los valores enumerados se representan con el tipo de datos Long. Las funciones de Basic tienen acceso público a las enumeraciones. Los nombres de las enumeraciones y de los valores deben ser únicos dentro de una biblioteca y entre los módulos.

## Uso:

Mostrar valores constantes agrupados en WindowManager:

           Dim winMgr As Object : winMgr = <library>.<module>.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.

Temas relacionados

Instrucción Const, constantes

Instrucción Option VBASupport

Instrucción With

¡Necesitamos su ayuda!