Bit of help here.. TIMERS [SOURCE]

[Drag0n]

Okay. If I have this code:
```
Private Sub Timer1_Timer()
Label1.Caption = Format(Val(Label1.Caption) + 0.01, _
"fixed")
Loop
End Sub

```and then this code:
```
Private Sub Command1_Click()
Call Timer1_Timer
End Sub

```Anything wrong with that? I dunno how to start the timer..

[unnown]

timer1.enabled = true

works better :)

[Drag0n]

So like..```
Private Sub Command1_Click()
Timer1.enabled = True
End Sub
```?

No that didn't work.

[unnown]

yeah that should work :)

[Drag0n]

It doesn't.. sorry for bugging you lol. here I'll post it as an attachment.

Nah I'll pm it to you.

[unnown]

Private Sub Timer1_Timer()
Label1.Caption = Format(Val(Label1.Caption) + 0.01, _
"fixed")
End Sub

why did you add the loop? not needed :)

[Drag0n]

Still doesn't work..

here's entire code

```
'Resets timer
Private Sub Command4_Click()
Label1.Caption = ""
End Sub
'IS the timer
Private Sub Timer1_Timer()
Label1.Caption = Format(Val(Label1.Caption) + 0.01, _
"fixed")
End Sub
'Starts the timer
Private Sub Command1_Click()
Timer1.Enabled = True
Call Timer1_Timer
End Sub
'Pauses the timer
Private Sub Command2_Click()
timer1_enabled = False
Stop Timer1_Timer
End Sub

```

[unnown]

Private Sub Command1_Click()
Timer1.Enabled = True
End Sub
'Pauses the timer
Private Sub Command2_Click()
Timer1.enabled = False
End Sub

that should work, otherwise the stuff in the timer is wrong,
or the timers properties

also try just this as your timer

Private Sub Timer1_Timer()
Label1.Caption = "THANKS UNNOWN"
End Sub

[Drag0n]

Let me get it straight. When I press Command1 ("Start") it goes up 0.01 then nothing happens. If I press it again it goes to 0.02\. Is there a way to continually add 0.01 until someone presses stop? like a stopwatch?

[Drag0n]

When I click using your code nothing happens. when I click using my code it goes up + 0.01.

[unnown]

check the properties of the timer, something is wrong there :)

[Drag0n]

Ok..

[Drag0n]

haha! thanks Unnown! it works, I just needed to set the interval to 1.

[unnown]

good :D

also use this code

Private Sub Command1_Click()
Timer1.Enabled = True
End Sub

'Pauses the timer
Private Sub Command2_Click()
Timer1.enabled = False
End Sub

[Drag0n]

That automatically starts the timer when I open the .exe.. is there any way to make it start on "Startbtn1" command?

[unnown]

set enabled to false in properties

[Drag0n]

Thanks Unnown, thanks all. Got it to work now.

:D