Scroll event example for Visual Basic

This example demonstrates the Scroll event.

Private Sub Lead1_Scroll()
    ' Add a TextBox control to your form and use it for this test
    Text1.Text = "Image origin: " + CStr(Lead1.DstLeft) + ", " + cStr(Lead1.DstTop)
    Text1.Refresh
End Sub