vb2005 怎么知道滚轮转动量

来源：百度知道 编辑：UC知道 时间：2024/06/05 14:30:10
vb2005 怎么知道滚轮转动量是多少
答楼下的朋友问:
打开:
Protected Overrides Sub OnMouseWheel(ByVal e As MouseEventArgs)
'你的程序
End Sub

先请教下,你是怎么拦截到鼠标滚轮转动事件的呢?
===================================================
Protected Overrides Sub OnMouseWheel(ByVal e As MouseEventArgs)
Dim x As Integer
x = e.Delta
wx = wx + x 'wx为一全局变量记录x的总变化量
Label1.Text = wx.ToString()
End Sub

'e.Delta里就是滚轮的增量,好像,向上滚是120, 向下是-120, 累加起来就行了.
好像每次滚动都是120, 有没有办法重新设定呢?
还有一点就是,这个程序到底有什么用喃!