[RESOLVED] Stoping the moving picture

[chrisman10]

Private intTime As Integer

Private Sub cmdfire_Click()
If img2.Left < 1200 Then
tmr1.Enabled = False
End If
tmr1.Enabled = True


End Sub

Private Sub Form_Load()
tmr1.Enabled = False

End Sub

Private Sub tmr1_Timer()
img2.Move img2.Left - 20


End Sub


I have this picture moving left but i want it to stop at a certain time can someone please explain how this could be done.

Thank you

[Gamemaster1494]

Make this in tmr1u

Dim i as integer
i = i + 1
img2.Move img2.left - 20
If i = 20 then
tmr1.enabled = true
tmr2.enabled = false
end if

Instead of the If i = 20, put it for the amount of time you need. Hope I helped!

[chrisman10]

Thank you very much

[Gamemaster1494]

You are very welcome. Glad i could help.