Ho provato adesso, probabilmente non è la soluzione ottimale ma la logica penso sia questa:
Nel form ci sono solo 2 textbox e la scrollbar verticale. I valori in neretto li metti come sei + comodo tu
Codice:
Dim TOP1 As Integer, TOP2 As Integer
Private Sub Form_Load()
VScroll1.Min = 0
VScroll1.Max = 20
TOP1 = Text1.Top
TOP2 = Text2.Top
End Sub
Private Sub VScroll1_Change()
Text1.Top = TOP1 - VScroll1.Value * 80
Text2.Top = TOP2 - VScroll1.Value * 80
End Sub
Private Sub VScroll1_Scroll()
Call VScroll1_Change
End Sub