takeiteasy 发表于 2004-11-10 13:43:00

[VBA]如何获得鼠标的动态坐标？晕

<FONT face=宋体 size=2>怎么才能使用VBA在CAD中实时的读取当前鼠标位置的坐标呀？请各位指教</FONT>

yulijin608 发表于 2004-11-10 14:55:00

在cad中，当移动鼠标的时候，下面不是实时的显示着坐标吗？

allblus 发表于 2004-11-15 08:42:00

dim pickpoint as variant


dim x,y,z as double


pickpoint = thisdrawing.utility.getpoint(,"鼠标取点：")


x=pickpoint(0)


y=pickpoint(1)


z=pickpoint(2)


       


就这样咯

takeiteasy 发表于 2004-11-15 10:26:00

谢谢你了，老大！<BR>我问的是如何获得动态的坐标，就是鼠标位置的坐标，而不是发生单击动作拾取的点！我晕！！！

雪山飞狐_lzh 发表于 2004-11-15 10:41:00

在本站下载区找AcadX
页: [1]
查看完整版本: [VBA]如何获得鼠标的动态坐标？晕