VB6MouseWheel.zip
冬至快乐^-^
第一次上传资源,收一个积分当作纪念,意思意思犒劳一下劳动成果呗,不用积分也可以的,就在我CSDN博客里面拿资源哈^-^
vb6控件一般都不支持【鼠标滚轮滚动事件】,那么我们利用消息处理机制(Hook消息处理函数),给控件增加一个鼠标滚轮滚动事件。
资源【VB6MouseWheel.zip】中包含VB6源码+示例exe。
代码示例是给一个文本框text增加一个“响应鼠标滚轮滚动的事件”,前滚+1,后滚-1,并将值返回填回文本框。如果您想实现自己的效果,只需要更改事件“PrivateSubtxtNum_MouseWheel(ByValDeltaAsLong,By
用户评论