how to use a scrollbar

[007shahid]

I have no VB Access right now. But from the top of my head...

'In a form
Dim LastV as Integer
 
Private Sub Form_Load()
LastV = VScrollBar1.Value
End Sub
 
Private Sub VScrollBar1_Scroll()
     'Move the label depending on the scroll
     'If the scroll value increases, subtraction will become addition
     Label1.Top = Label1.Top - (LastV - VScrollBar1.Value)
     'Save the Last scroll value
     LastV = VScrollBar1.Value
End Sub

Add a scrollbar (VScrollBar1) and a label (Label1) to the form