说三道四技术文摘-感悟人生的经典句子
说三道四 > 文档快照

捕捉 MouseExit 事件 -VB资料

HTML文档下载 WORD文档下载 PDF文档下载
捕捉 MouseExit 事件 -VB资料

MouseDown、MouseUp、MouseMove。VB 似乎提供了很好的 Mouse 事件。但好象还缺少什么!对!还差 MouseExit(鼠标移出)事件。在 VB 中,我们要捕捉 MouseExit 事件,必须用 API 函数:
Private Declare Function SetCapture Lib "user32" (ByVal hWnd As Long) As Long
Private Declare Function ReleaseCapture Lib "user32" () As Long
然后,我们可以在控件(以 Picture1 为例)的 MouseMove 事件上加上以下代码:

With Picture1 'Change this to the name of the control
If Button = 0 Then
If (X < 0) Or (Y < 0) Or (X > .Width) Or (Y > .Height) Then
'Mouse pointer is outside button, so let other controls receive
'mouseevents too:
ReleaseCapture
' 放入鼠标离开的代码
Else
' Mouse pointer is over button, so we'll capture it, thus
' we'll receive mouse messages even if the mouse pointer is
' not over the button
SetCapture .hwnd

' 放入鼠标进入的代码
End If
“锤子OS”功能猜测与罗式对比营销 神奇!1KB JavaScript代码编写的3D蜜蜂 顶尖技术人员“兜售”的顶尖编程语言、扩展工具等 移动阅读商业化:Flipboard支持用户DIY杂志 全球移动App:Top 52发行商排行榜 除了微软网站外哪里还能下载DirectX9b SDK? bulk insert的运用问题 如何让一个窗口始终在最前面? 求教!谢谢! 我该如何进一步学习C++以及编程? ASP文件解密问题,高手请指点 怎样在本地机上建立sql server2000表 我先开MODEM,再开主机,启动进入系统前 我先开MODEM,再开主机,启动进入系统前 《历史的选择》的读书笔记100字以内. 历史报告的心得体会报告的内容是关于”潮汕地区地理景 1.把99拆成4个数,使得第一个数加2,第二个数减 中译英 以免误了开会 中国历史读书笔记 求中译英:公司material已准备好,会议室到时 历史读书笔记 中译英:你将会在开会前两周收到它 历史的选择读书笔记 甬台温高速一客车冲落路基 1死5伤日本一女大学生因在公园拍摄成人视频被亿万富翁崛起捷克政坛 所在政党成议会卡梅伦首次跌出权力榜前十 遭英媒体嘲报告称南澳大利亚州今年已有84人被猫国际8大企业巨头是如何财务造假的?二手房估价厅民间厨神招募中 美食温泉等你来“谁家的孩子谁抱走” 万亿地方债置换老师未及时批作业 被全校“问卷大讨论倾城剑神诳天大风起于汉末回到唐朝当炼师高太尉都市行金沙江大拐弯旅游虎门林则徐纪念馆旅游虎门大桥旅游满家寨旅游河口风景区旅游
备案号:鲁ICP备13029499号-2 说三道四 www.s3d4.cn 说三道四技术文摘