In design mode, set the LargeChange property of the VSCroll1 to 750 and the SmallChange property to 500. Then your code should look like this:
Private Sub VSCroll1_Change()
Picture2.Top = -VSCroll1.Value
End Sub
Give that a try!
Printable View
In design mode, set the LargeChange property of the VSCroll1 to 750 and the SmallChange property to 500. Then your code should look like this:
Private Sub VSCroll1_Change()
Picture2.Top = -VSCroll1.Value
End Sub
Give that a try!