qianluxi 发表于 2008-9-24 19:59:00

[求助]如何在选择集中去掉特定对象

<p>我先在屏幕上选择对象，然后想从这些对象中去掉（不是删除）在图层DivideLines_LAYER上的对象，请问该如何写</p><p>Set currentselection = ThisDrawing.SelectionSets<br/>On Error GoTo errorhandle1<br/>If currentselection.Count = 0 Then<br/>Set ContourSel = ThisDrawing.SelectionSets.Add("Contour")<br/>ContourSel.SelectOnScreen<br/>Else<br/>ThisDrawing.SelectionSets("Contour").Delete<br/>Set ContourSel = ThisDrawing.SelectionSets.Add("Contour")<br/>ContourSel.SelectOnScreen<br/>End If<br/>NumContourLine = ContourSel.Count</p><p>For i = 0 To NumContourLine - 1<br/>&nbsp;&nbsp;&nbsp; If ContourSel.Item(i).Layer = "DivideLines_LAYER" Then<br/>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; 找到满足条件的对象后怎么使用removeitems?<br/>&nbsp;&nbsp;&nbsp; End If<br/>Next i</p>

style6301 发表于 2008-9-25 23:44:00

<p>你参考一下下面的代码：</p><p>&nbsp;</p>

style6301 发表于 2008-9-26 00:02:00

<p>你看下这3页《在实体选择中使用过滤机制》，可能对你会有帮助，自己试试，今天不知道为什么不能上传，我已将这3页发到你邮箱（qianluximusic@yahoo.com.cn）中去了。</p><p></p><p></p>

qianluxi 发表于 2008-9-27 11:27:00

非常感谢，已经解决了
页: [1]
查看完整版本: [求助]如何在选择集中去掉特定对象