robbin840311 发表于 2010-4-26 20:59:00

[求助]VBA的选择集怎么实现如下操作

<p>题目一句话不能说明要表达的意思，代码如下：</p><p>&nbsp; Dim sset As AcadSelectionSet<br/>&nbsp; Set sset = ThisDrawing.SelectionSets.Add(Now)<br/>&nbsp; <br/>&nbsp; sset.Clear<br/>&nbsp; sset.Select acSelectionSetAll</p><p>如何将sset传递给CAD以作后期操作呢？传递给如附件图片中的“当前选择“</p><p></p><p></p>

学至于行 发表于 2010-4-26 21:43:00

<p>遍历</p>

雪山飞狐_lzh 发表于 2010-4-26 22:17:00

<p>这个VBA干不了，选择集这块com做的很不好，没办法像lisp一样直接给其他命令调用</p><p>有间接的方法，不过要借助lisp，而且很慢</p><p>所以，不如直接用lisp实现</p><p>VBA，Autodesk自己都放弃掉了，哎</p>

wuyunpeng888 发表于 2010-4-26 22:40:00

应该说是微软转向了

robbin840311 发表于 2010-4-27 13:18:00

<p>版主，请问使用lisp如何实现呢？</p>
页: [1]
查看完整版本: [求助]VBA的选择集怎么实现如下操作