VB2005 裡面有MouseWheel 的方法喔

點選 Form1 事件(Form1就是你的Form的名稱)
選 MouseWheel事件

在事件裡面

e.Delta 就可以取得現在的滾輪資訊

例如:
Private Sub Form1_MouseWheel(ByVal sender As Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles Me.MouseWheel
If e.Delta > 0 Then
Label1.Top = 10
Else
Label1.Top -= 10
End If
End Sub

Label 就會隨你滾輪 上下移動

arrow
arrow
    全站熱搜

    tenhon66 發表在 痞客邦 留言(1) 人氣()

    E-mail轉寄