Scrolling a control with mouse events

네크 2014.05.15 08:13:22 *: 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

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