jicqj 发表于 2010-2-14 22:51:00

如何自动选中handle 为"9D"的对象

<p>我刚刚学 lisp .</p><p>请问各位老师 如何写个句子 选中 handle 为"9D"的对象.</p><p>另外想知道 在vba里面 是不是无法实现这个功能?</p>

Student 发表于 2010-2-15 06:35:00

<p>试试：</p><p>(setq ent(handent "9D"))</p><p></p>

jicqj 发表于 2010-2-15 09:52:00

<p>应该是用 这样的语句:&nbsp;&nbsp;&nbsp; (sssetfirst gripset ss)</p><p>可是,如何让 ss = handle "9D"&nbsp; ?</p>

sailorcwx 发表于 2010-2-15 22:40:00

用ssadd将(handent "9D")添加到ss选集中

jicqj 发表于 2010-2-17 15:08:00

<p>经过试验&nbsp; 语句如下:</p><p>(defun c:bb1()<br/>(setq e1(handent "9D"))<br/>(setq ss (ssadd))<br/>(ssadd e1 ss)<br/>(sssetfirst gripset ss)<br/>)</p><p>化简的写法:</p><p>(defun c:bb2()<br/>(sssetfirst gripset (ssadd (handent "9D") ss))<br/>)</p><p>谢谢楼上的指点.</p>

jicqj 发表于 2018-7-11 16:41:44

VB:
sub bb()
Dim OBJ As Object
Set OBJ = ThisDrawing.HandleToObject(“9D”)
Obj.Highlight True
end sub
页: [1]
查看完整版本: 如何自动选中handle 为"9D"的对象