File Link (image prg : drive.google.com/drive/folders/1F6J4Vg73W3GboIkGB4mCnnJDHIYJOWfp?usp=share_link code: Private Sub Command1_Click() Timer1.Interval = 100 End Sub Private Sub Command2_Click() Timer1.Interval = 0 End Sub Private Sub Form_Load() End Sub Private Sub Timer1_Timer() Picture1.Left = Picture1.Left + 100 If Picture1.Left = Me.Width Then Picture1.Left = 0 End If End Sub ---------------------------------------------------------------------------- 2commandbutton 1timer 1 or 2 image