Dim pnl As WinForm.Panel = e.Form.Controls("Panel1")Dim p As Point = pnl.ScrollPosition
Select e.Sender.SelectedIndex Case 0 p.y = 0 Case 1 p.y = 157 Case 2 p.y = 314 Case 3 p.y = 518End Select
'pnl.ScrollPosition = p