AutoCAD 二次开发 （VBA） 怎样将某一图层，比如图层名为“Brick”的图层，通过vba代码设置为当前图层？

Question

如题所述

Answer 1

Dim currLayer As AcadLayer
Set currLayer = ThisDrawing.Layers.Add("Brick")
ThisDrawing.ActiveLayer = currLayer追问

那如果是已经建好的图层，已知图层名称，那怎么把它设为当前？

Answer 2

ThisDrawing.ActiveLayer ="Brick"本回答被提问者采纳

Answer 3

ActiveLayer = ThisDrawing.Layers.Item("Brick")