在VBA中怎么实时获取鼠标位置的坐标值？

liyanchao1 · 发表于 2004-12-9 17:41:00

<BR>求助: 在VBA中怎么实时获取鼠标位置的坐标值？

当用户在屏幕上移动鼠标时，在VBA中怎样实时获取当前鼠标位置的坐标，然后再在屏幕上显示由当前的X，Y坐标转换成的当前里程值。

请高手兄弟姐妹些能不能详细点的给我介绍一下，如有实例程序更好，在下非常感谢。

谢谢大家！

mccad · 发表于 2004-12-9 19:57:00

只用VBA不行。

tiger8888 · 发表于 2004-12-9 21:42:00

很早以前，我用lisp写过一个小程序，程序中是自动感应鼠标位置的，不过也只能在程序运行时感知鼠标位置，不是反应器那样的。我把那个程序贴上来，供你参考。用vb如何实时感知鼠标位置，就不知道了，用循环＋doevents？不知道，乱想的。

liyanchao1 · 发表于 2004-12-10 09:05:00

TIGETR老兄：

如果用VBA 调用该LISP程序，该如何编写VBA程序？

雪山飞狐_lzh · 发表于 2004-12-10 10:57:00

最好的办法是用Lisp调用VBA，而不是VBA调用Lisp

tiger8888 · 发表于 2004-12-10 12:42:00

如果用VBA 调用该LISP程序，该如何编写VBA程序？

我对这方面也不太懂，我只会用thisdrawing.sendcommand直接发送lisp语句来load lisp文件

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