>>554
うひょひょ。勝手に動くｗ

[UserControl]
Private Sub Timer1_Timer()
Extender.Left = Extender.Left * 1.1
End Sub