[RESOLVED] Stoping the moving picture
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
Re: Stoping the moving picture
Make this in tmr1u
Code:
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!
Re: Stoping the moving picture
Re: [RESOLVED] Stoping the moving picture
You are very welcome. Glad i could help.