鼠标事件

Question

我得到了一个形式与vertical scroll bar，我想用鼠标滚轮上下滚动窗体，但我似乎无法得到mousewheel event射击。

我只是使用标准mousewheel事件

Private Sub frmTest_MouseWheel(ByVal sender As Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles Me.MouseWheel 

'code here 

End Sub 

任何帮助，将不胜感激。

Answer 1

尝试把一个Panel在Form设置为AutoScroll = true，Dock = Fill从Panel地方所有的控制像TextBox，label，listView等。

Private Sub Panel1_MouseEnter(sender As System.Object, e As System.EventArgs) Handles Panel1.MouseEnter 
     Panel1.Focus() 
    End Sub 

    Private Sub Panel1_MouseWheel(sender As Object, e As System.Windows.Forms.MouseEventArgs) Handles Panel1.MouseWheel 
     MessageBox.Show("okay") 
    End Sub