[求助]选择集使用需要重复的问题！急！

cwgg198265 · 发表于 2007-1-25 23:07:00

　　选择集需要重复使用时，为什么只能选择一次，第二次开始就不行了，望高手回答！谢谢！

dfgs · 发表于 2007-1-26 08:45:00

在第二次使用前将选择集清空就行了，以前的帖子有这方面的现在代码

jkbanana · 发表于 2007-1-26 13:21:00

'比如，要利用一个名为 "TEST_SSET" 的选择集时，可以如下操作
Dim ssetObj As AcadSelectionSet
On Error Resume Next
ThisDrawing.SelectionSets.Item("TEST_SSET").Delete
On Error GoTo 0
Set ssetObj = ThisDrawing.SelectionSets.Add("TEST_SSET")

cracher · 发表于 2007-1-26 18:07:00

没有必要那么麻烦
程序初始化时,创建选择集
重复使用时,只需要选择集.Clear即可

[求助]选择集使用需要重复的问题！急！

发表回复

精选推荐