weekendor 发表于 2005-11-11 15:54:00

[VBA]选择集有什么用途？

<P>VBA中选择集通常用于什么场合呢？　可以作以下用途么－－</P>
<P>&nbsp; Public ssetObj As AcadSelectionSet<BR>&nbsp; Set ssetObj = ThisDrawing.SelectionSets.Add("msset")&nbsp;&nbsp;<BR>&nbsp; ssetObj.SelectOnScreen<BR>&nbsp;&nbsp;'...<BR>&nbsp;&nbsp;ThisDrawing.SendCommand "move" &amp; vbCr &amp;&nbsp; ????? &nbsp;&amp; vbCr</P>
<P>我想创建一个选择集，然后在程序中用SendCommand启动"move"命令，把刚刚选入选择集的图元作为移动的对象，但我不知将ssetObj的什么属性填入 ????? 中。。。</P>
<P>请高手指点，谢谢！！！<BR></P>

macula 发表于 2005-11-12 16:05:00

<P>楼主，这样恐怕不行吧！</P>
<P>如果你真的想用 move命令只能如下实现：</P>
<P>thisdrawing.sendCommand "move "<BR>thisdrawing.sendCommand "(ssget "p") "</P>
<P>&nbsp;</P>
<P>&nbsp;</P>
页: [1]
查看完整版本: [VBA]选择集有什么用途？