关于创建选择集 (VBA/ActiveX)
若要创建命名选择集,请使用以下方法。此方法只需要一个参数,即选择集的名称。Add 如果已存在同名的选择集,AutoCAD 将返回错误消息。当不再需要选择集时,删除它是一种很好的编程做法。使用该方法删除选择集,如以下示例所示:Delete ThisDrawing.SelectionSets.Item("NewSelectionSet").Delete 创建一个空的选择集本示例创建一个新的选择集。 Sub Ch4_CreateSelectionSet() Dim selectionSet1 As AcadSelectionSet Set selectionSet1 = ThisDrawing.SelectionSets.Add("NewSelectionSet") End Sub |
|Archiver|CAD开发者社区 ( 苏ICP备2022047690号-1 苏公网安备32011402011833)
GMT+8, 2024-12-15 12:33
Powered by Discuz! X3.4
Copyright © 2001-2021, Tencent Cloud.