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

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

我刚刚学 lisp .

请问各位老师如何写个句子选中 handle 为"9D"的对象.

另外想知道在vba里面是不是无法实现这个功能?

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

试试：

(setq ent(handent "9D"))

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

应该是用这样的语句: (sssetfirst gripset ss)

可是,如何让 ss = handle "9D" ?

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

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

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

经过试验语句如下:

(defun c:bb1()
(setq e1(handent "9D"))
(setq ss (ssadd))
(ssadd e1 ss)
(sssetfirst gripset ss)
)

化简的写法:

(defun c:bb2()
(sssetfirst gripset (ssadd (handent "9D") ss))
)

谢谢楼上的指点.

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

VB:
sub bb()
Dim OBJ As Object
Set OBJ = ThisDrawing.HandleToObject(“9D”)
Obj.Highlight True
end sub

账号		自动登录	找回密码
密码			注册

[基础] 如何自动选中handle 为"9D"的对象