bai_cai101 发表于 2005-2-18 21:35:00

[VBA]请教选择集过滤设置!!

在过滤条件中,<or,<and and> or>它们的逻辑关系如何,设置原理怎么啊,DXF帮助里找不到啊!!求各位大虾讲解一下!!多谢了!!


Sub tta()<BR>On Error Resume Next<BR>Dim ss As AcadSelectionSet<BR>ThisDrawing.SelectionSets("Test").Delete<BR>Set ss = ThisDrawing.SelectionSets.Add("Test")<BR>Dim ft(6) As Integer, fd(6)<BR>ft(0) = -4: fd(0) = "&lt;or"<BR>ft(1) = -4: fd(1) = "&lt;and"<BR>ft(2) = 8: fd(2) = "0"<BR>ft(3) = 62: fd(3) = 256<BR>ft(4) = -4: fd(4) = "and&gt;"<BR>ft(5) = 62: fd(5) = 1<BR>ft(6) = -4: fd(6) = "or&gt;"<BR>ss.Select acSelectionSetAll, , , ft, fd<BR>MsgBox ss.Count<BR>

mccad 发表于 2005-2-20 22:09:00

这些在DXF文档中没有，你可以看看VL文档中有关过滤器的介绍。
页: [1]
查看完整版本: [VBA]请教选择集过滤设置!!