[VBA]关于图层选择的问题

gjliang

请教各位，不知能否实现通过选取一个实体而达到把这个实体所在层上的所有实体均选中，（就是想不通过对话框来实现快速选择里的通过图层填加选择集。）

subtlation

不编程的办法：把每个图层里的东西全部变成一个组。选择时就可以全部选定了。
编程的办法：遍历图形中的所有实体，如果和选择的物体的层相同就加入选择集。

subtlation

哦，还可以用语句直接选择
object.Select Mode[, Point1][, Point2][, FilterType][, FilterData]

莫名

用Selectonscreen方法选择实体，然后得到实体的图层，用该图层筛选构造选择集，用选择集的Erase方法删除选择集中的实体。

bluemoon

看看以前的帖子 应该对你有帮助啊
http://bbs.mjtd.com/forum.php?mod=viewthread&tid=11907&star=2&skin=0