mi da problemi mi fa come tutti scatti


codice:
Private Sub Form_Load()
VScroll1.Max = Picture1.Height
End Sub

Private Sub VScroll1_Scroll()

Picture1.Top = VScroll1.Value



End Sub

e la scroll ha come max l'altezza della picture