timer control

i wan to know how i can control the timer with a command button.

i click on play the timer start and if i click
on stop the timer stop

Code:

---

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

Private Sub cmdStop_Click()
  Timer1.Enabled = False
End Sub

---