VB.NET

Scrolling a control with mouse events

2014.05.15

* Public Class Form1

Private Sub SC_MouseWheel(sender As Object, e As System.Windows.Forms.MouseEventArgs) Handles SC.MouseWheel

Dim myView As Point = Me.SC.AutoScrollPosition

myView.X = (myView.X + 100)
myView.Y = (myView.Y + 100)

Me.SC.AutoScrollPosition = myView
End Sub

Private Sub Form1_Load(sender As System.Object, e As System.EventArgs) Handles MyBase.Load

Me.SC.Select()

End Sub
End Class 

마우스 휠 스크롤 이벤트 입니다.



이 게시물을
목록
목록
쓰기
태그