[VBA] 关于如何取得点的坐标

tfod2000 · 发表于 2004-11-2 11:08:00

我通过选择集在实体中选择了一些实体，当选择是点时我想返回它的坐标。不知道怎么实现。又要向各位老师请教了。

yulijin608 · 发表于 2004-11-2 15:06:00

你看可不可以通过lisp取坐标，用thisdrawing.secondcommand ThisDrawing.SendCommand "(setq b (assoc 10(entget(entlast)))) "
ThisDrawing.SendCommand "(setvar " & """userr1""" & "(cadr b)) "
ThisDrawing.SendCommand "(setvar " & """userr2""" & "(caddr b)) "
ThisDrawing.SendCommand "(setvar " & """userr3""" & "(cadddr b)) "

雪山飞狐_lzh · 发表于 2004-11-2 15:13:00

[WEB]http://www.vba.cn/object/acad2004/idh_coordinates.htm[/WEB]

yulijin608 · 发表于 2004-11-2 15:24:00

原来可以这样得到坐标阿，好，又学到一招。

tfod2000 · 发表于 2004-11-2 15:46:00

谢谢各位老师，mjtd真好，各位老师更好

laoliu09 · 发表于 2004-11-3 11:44:00

请问斑竹！这是电子版的VBA入门的书吗？可以下载吗？

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