- 博客(17)
- 资源 (10)
- 收藏
- 关注
RSS订阅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
2011-12-20
空空如也
TA创建的收藏夹 TA关注的收藏夹
TA关注的人