关于将对象添加到选择集 (VBA/ActiveX) 
您可以将对象添加到活动选择集中。 使用以下任一方法将对象添加到选择集: 
 将选定对象添加到选择集本示例提示用户选择对象,然后将这些对象添加到选择集中。 Sub Ch4_AddToASelectionSet()
  ' Create a new selection set
  Dim sset As AcadSelectionSet
  Set sset = ThisDrawing.SelectionSets.Add("SS1")
  ' Prompt the user to select objects
  ' and add them to the selection set.
  ' To finish selecting, press ENTER.
  sset.SelectOnScreen
End Sub
 | 
|Archiver|CAD开发者社区
( 苏ICP备2022047690号-1   苏公网安备32011402011833)
GMT+8, 2025-11-4 15:12
Powered by Discuz! X3.4
Copyright © 2001-2021, Tencent Cloud.