Conversión de una capa en activa
Trabajar con capas
Inutilización y reutilización de capas
Las capas desactivadas se regeneran con el dibujo, pero no se visualizan ni trazan. Al desactivarlas, se evita tener que regenerar el dibujo cada vez que se reutiliza una capa. Al activar una capa que se ha desactivado, AutoCAD vuelve a dibujar los objetos de esa capa.
Para activar y desactivar capas, utilice la propiedad LayerOn. Si le asigna el valor TRUE, la capa se activa. Si le asigna el valor FALSE, la capa se desactiva.
Este ejemplo crea una capa nueva, le añade un círculo y la desactiva para que el círculo no esté visible.
Sub Ch4_LayerInvisible()
' Create a circle
Dim circleObj As AcadCircle
Dim center(0 To 2) As Double
Dim radius As Double
center(0) = 2: center(1) = 2: center(2) = 0
radius = 1
Set circleObj = ThisDrawing.ModelSpace. _
AddCircle(center, radius)
' Create a new layer called "ABC"
Dim layerObj As AcadLayer
Set layerObj = ThisDrawing.Layers.Add("ABC")
' Assign the circle to the "ABC" layer
circleObj.Layer = "ABC"
circleObj.Update
' Turn off layer "ABC"
layerObj.LayerOn = False
ThisDrawing.Regen acActiveViewport
End Sub