I have two picture boxes and a multiline textbox (with text in it)..

am using the picture boxes as scroll bars (up and down), using the MouseDown event.

this.. for going down the text box... (3 lines at a time)

Private Sub Picture2_MouseDown(Button As Integer, Shift As Integer, X As Single, Y As Single)
Text1.SetFocus
SendKeys ("{down}")
SendKeys ("{down}")
SendKeys ("{down}")
End Sub

and similar for going up...


anyway... does anyone know a way so that it will contiune to go down (or up) as long as the mouse is down on the pictrue box? instead of having to click repeadidily .... am trying to make it behave like a scroll bar.

Abe