急，如何捕获鼠标的X,Y值？我要做一个浮动工具条

Question

出处：http://home.chaozhou.gd.cn/~superboy/vb/bcjq/jq10.htm
捕捉 MoueExit 事件MouseDown、MouseUp、MouseMove。VB 似乎提供了很好的 Mouse 事件。但好象还缺少什么！对！还差 MouseExit（鼠标移出）事件。在 VB 中，我们要捕捉 MouseExit 事件，必须用 API 函数： Private Declare Function SetCapture Lib "user32" (ByVal hWnd As Long) As LongPrivate Declare Function ReleaseCapture Lib "user32" () As Long 然后，我们可以在控件（以 Picture1 为例）的 MouseMove 事件上加上以下代码： Dim MouseExit As BooleanMouseOver = (0 <= X) And (X <= Picture1.Width) And (0 <= Y) And (Y <= Picture1.Height)If MouseExit Then........ SetCapture Picture1.hWndElse........ ReleaseCaptureEnd If 

Answer 1

MouseExit===========（鼠标移出）

Answer 2

hhhhhhhhhh.............................多线程呢，借你这里介绍一下想不想让 VB 象 C 或 Java 一样能创建安全的多线程？使用此控件，你就可以十分简单地创建多线程。 （共享软件；大小：212K；） http://duke.net/files/athread.exe

Answer 3

asBubbleWindow 1.0asBubbleWindow 包含 asBubbleWindow 和 asAssistantPopup。asBubble 控件可以放置在窗口上来创建 Microsoft Office 97 助手类型的窗口。asAssistantPopup 是用来创建 Microsoft Office 97 助手类型的弹出式按钮，它支持 MouseEnter 和 MouseExit 事件。（自由软件，37K）
http://members.tripod.com/~Aspiration/asBubble01.zip

Answer 4

这样的问题你也问得出来，在屏幕右下角放一个透明的窗口，当主窗口加载时就unload

Answer 5

这样的问题你也问得出来，在屏幕右下角放一个透明的窗口，当主窗口加载时就unload

Answer 6

源码下载：23K http://www.zhanjiang.gd.cn/home/jinyt/qd/bc/vbbc/ydmq/db/mousetracker.zip原来网页的说明：
该趣味小程序用来统计您的鼠标所走的距离,您也许见过类似的程序,如 Odometer.这里提供了MouseTracker的全部源代码,展示了用VB编程的多种技巧.如:用注册表保存应用程序状态或数据,随时获取鼠标所在位置(不仅   仅限于客户区),改变系统菜单(就是有"移动"."关闭"的那个)并使之响应(用到了VB5.0的利器--AddressOf),隐藏信息屏(即复活节彩蛋)等等.强力推荐!

Answer 7

获取鼠标所在位置(不仅  仅限于客户区),
http://www.zhanjiang.gd.cn/home/jinyt/qd/bc/vbbc/ydmq/db/mousetracker.zip