请教关于选择集的acSelectionWindow

evaporated

各位高手：
我在用选择集的时候遇到这样的问题：
acSelectionWindow参数，按照我的理解，在该窗口坐标范围内的被选中，不在的肯定不被选中。
如果实体有一部分在该坐标范围内，也不被选中。

在实际应用中。发现如果要用acSelectionWindow选取BlockReference
该块参照中有一条线在该坐标范围内，其余实体不在的。也被选中了。

因为我遇到的块都是矩形块。
两个矩形块相邻并公用一条边时。
当用acSelectionWindow按照其中一个的坐标范围进行选择，就会选上另一个。

这个问题是怎么回事？还请各位指教！

雪山飞狐_lzh

我试过没问题，测试代码如下： Sub tt()
On Error Resume Next
p1 = ThisDrawing.Utility.GetPoint
p2 = ThisDrawing.Utility.GetCorner(p1)
Dim ss As AcadSelectionSet
ThisDrawing.SelectionSets("Test").Delete
Set ss = ThisDrawing.SelectionSets.Add("Test")
ss.Select acSelectionSetWindow, p1, p2
MsgBox ss.Count
End Sub

evaporated

       


采用版主给出的测试代码，该问题依然存在。


这是一张出问题的图。


请版主帮忙看下。


请注意两个名字为 "BOX"的BlockReference


这就是出问题的两个。


在图中他们是上下两个外框，但是当选中一个时 ，选择集将另一个也选中了进来。