[VBA程序]：关于选择集

xsquan

mode = acSelectionSetFence
ss.SelectByPolygon mode, points
我用这样的方法选择和一直线相交的多义线，points是那条直线的坐标，我发现在我的程序里面要是把直线放大，选择集的count就会少一些，如果再把cad的zoom缩小到我要的直线都出现在屏幕，那样却是好的，请问有这种情况吗？
还有正好经过那一条直线的端点的多义性是没有被选中的（有的时候是这样，有的时候有可以，），怎么样解决啊？谢谢！

efan2000

关于选择集，在CAD的解释是这样的。

1. 
   
2.   [FONT=courier new]
   
3.     通常情况下，必须用选择窗口包住整个对象才能选择该对象。
   
4. 但是，可以用选择窗口包住整个线型或线型的任意可见部分，从而选择非连续线型的对象。
   
5. 例如，如果一条直线的线型为点划线，那么用选择窗口包住一个或多个完整的点划就能选择整条线。
   
6.   [/FONT]
   

复制代码

用VBA编程的选择集也符合这种情况，即如果一部分线对象完全在当前窗口外（不可见），那么就不选择。如果仅部分可见，这时CAD认为可以构成一条线对象，那么就选择，否则不选择。
因而，选择时最好都在屏幕中可见的状态下，至少线的相交部分要保证，这时才不会出现少选的现象。

对于第二个问题，其实就是上面的情况。

xsquan

谢谢你的回答！我想要实现可以这样，可以先在屏幕上放大，选择直线，然后用zoomall，然后才是mode = acSelectionSetFence
ss.SelectByPolygon mode, points