文件名称:vb6鼠标滚轮支持控件
文件大小:13KB
文件格式:RAR
更新时间:2015-01-09 05:57:42
vb6鼠标滚轮支持
把这个控件添加到窗口上,你的vb6程序就具有了滚轮支持能力; 目前只支持控件:msflexgrid、 hscrollbar、vscrollbar 附上源码,有需要的可以自己扩充 优点:不会导致程序崩溃;而采用子类化的方式实现鼠标滚轮容易导致程序崩溃, 调用方法示例: Private Sub flgNotFinished_MouseDown(Button As Integer, Shift As Integer, x As Single, y As Single) If Button = 4 Then udfMouseScroll.sub_setFocus Me.flgNotFinished End Sub
【文件预览】:
MouseScroll
----MouseScroll.ocx(24KB)
----UserControl1.ctx(786B)
----UserControl1.ctl(2KB)
----MouseScroll.vbw(57B)
----MouseScroll.oca(17KB)
----MouseScroll.vbp(768B)
----mssccprj.scc(146B)
----MouseScroll.bmp(774B)
----vssver.scc(80B)
----MouseScroll.lib(3KB)
----MouseScroll.exp(997B)