让VB6支持鼠标滚轮动作

时间:2013-12-10 17:12:39
【文件属性】:

文件名称:让VB6支持鼠标滚轮动作

文件大小:128KB

文件格式:RAR

更新时间:2013-12-10 17:12:39

VB6 鼠标滚轮

 如何让VB应用程序支持鼠标滚轮?MSDN上有一篇解决VB下应用Intellimouse鼠标的文章,它解决这一问题的方法是通过一个几十K的第三方控件实现的,可惜该控件没有源代码。况且为了支持鼠标滚轮使用一个第三方控件,好像有点得不偿失。本文给出用纯VB实现这一功能的方法。


【文件预览】:
1.htm
1.files
----software04-120112.jpg(466B)
----261249.gif(7KB)
----newhard-040906_c_1.gif(43B)
----261515.gif(6KB)
----04-44.gif(307B)
----261511.jpg(2KB)
----261514.gif(6KB)
----yesky-software-content-column-s.js(1KB)
----261255.jpg(3KB)
----_pl=pl-15-software-all_tp=if_sk=0_ck=0_.files()
--------index-02.gif(69B)
----software04-120111.jpg(6KB)
----261516.gif(9KB)
----2004-30(1).gif(365B)
----index-04.gif(379B)
----261250.jpg(3KB)
----y-software-svbutton-1.js(4KB)
----openpic.gif(2KB)
----04-43(1).gif(112B)
----261256.jpg(3KB)
----software04-120113.jpg(397B)
----2004-30.gif(365B)
----261248.gif(5KB)
----261247.gif(1KB)
----04-44(1).gif(307B)
----10.js(5KB)
----261251.jpg(3KB)
----261509.gif(5KB)
----adbottom.htm(1KB)
----04.js(2KB)
----biaoshi.gif(1KB)
----261513.jpg(2KB)
----261510.gif(1KB)
----261246.gif(1KB)
----261254.jpg(3KB)
----index-02.gif(64B)
----yesky-home-new-button-1.js(584B)
----_pl=pl-15-software-all_tp=if_sk=0_ck=0_.htm(583B)
----04-logo1.gif(1KB)
----y-software-pip.js(603B)
----index-03.gif(99B)
----261244.gif(1KB)
----04-43.gif(112B)
----y-content-text-1.js(254B)
----261245.gif(1KB)
----kong.gif(43B)
----261252.jpg(3KB)
----adbottom.files()
--------adbottom.jpg(5KB)
----261253.jpg(3KB)
----open.gif(2KB)
鼠标滚轮成功例子
----Form1.frm(6KB)
----工程1.vbp(648B)
----Module1.bas(3KB)
----工程1.vbw(82B)
2.htm
2.files
----software04-120112.jpg(466B)
----newhard-040906_c_1.gif(43B)
----04-44.gif(307B)
----yesky-software-content-column-s.js(1KB)
----_pl=pl-15-software-all_tp=if_sk=0_ck=0_.files()
--------index-02.gif(69B)
----software04-120111.jpg(6KB)
----index-04.gif(379B)
----y-software-svbutton-1.js(4KB)
----bar2.jsp(1KB)
----openpic.gif(2KB)
----software04-120113.jpg(397B)
----2004-30.gif(365B)
----10.js(5KB)
----adbottom.htm(1KB)
----04.js(2KB)
----biaoshi.gif(1KB)
----index-02.gif(64B)
----yesky-home-new-button-1.js(584B)
----_pl=pl-15-software-all_tp=if_sk=0_ck=0_.htm(583B)
----04-logo1.gif(1KB)
----y-software-pip.js(603B)
----index-03.gif(99B)
----04-43.gif(112B)
----y-content-text-1.js(254B)
----kong.gif(43B)
----adbottom.files()
--------adbottom.jpg(5KB)
----open.gif(2KB)

网友评论

  • Hook方法,用最简洁的示例代码演示了如何在窗体上响应鼠标滚轮消息并进行了相关的操作。代码很简洁,程序在Win7_64+VB6.0环境下正常运行,效果明显,没有多余乱七八糟的代码,方便参考学习并移植到自己的代码中。