>Thank you very much.
>I modified your code (horizontal scrolling instead of vertical), and it works fine on simple example like yours.
>But controls I place on my form are highly complicated (custom class based on command button group), and it takes forever to scroll.

Right.
If you can ...
put a Container into the form Named VirtualPanel.
VirtualPanel.Top = 0
VirtualPanel.Width = 1.000.000 && the max dimension for the object righmost
VirtualPanel.Trasparent = True

Move all from's members into VirtualPanel on the original x,y

At this point you can replace the For Controls cycle with a single set

VirtualPanel.Left = VirtualPanel.Left - m.deltaLeft