Los objetos de colección
Los objetos de colección
Adición de miembros a una colección
Puede acceder a la mayoría de los objetos de colecciones a través del objeto Document. Dicho objeto contiene una propiedad por cada uno de los objetos Collection. Por ejemplo, el código siguiente define una variable y la define como la colección Layers del dibujo actual:
Dim layerCollection as AcadLayers
Set layerCollection = ThisDrawing.Layers
Puede acceder a las colecciones Documents, MenuBar y MenuGroups a través del objeto Application. Dicho objeto contiene una propiedad por cada una de estas colecciones. Por ejemplo, el código siguiente define una variable y la define como la colección MenuGroups de la aplicación:
Dim MenuGroupsCollection as AcadMenuGroups
Set MenuGroupsCollection = ThisDrawing.Application.MenuGroups