[RESOLVED] Electronic Draw

[mcsmba1]

Plz check my following code:

Private Sub cmdStop_Click()
    MyRs.Close
    Timer1.Enabled = False
    MyRs.Open "select ename from Draw where pno='" & lblPNO.Caption & "'", MyConn, adOpenKeyset, adLockOptimistic
    lblName.Caption = MyRs.Fields!Ename
    MyRs.Close
End Sub

Private Sub Form_Load()
    MyConn.Open "Draw"
    MyRs.Open "select * from Draw", MyConn, adOpenKeyset, adLockOptimistic
End Sub

Private Sub Timer1_Timer()
    lblPNO.Caption = MyRs.Fields!PNO
    MyRs.MoveNext
    If MyRs.EOF Then
       MyRs.MoveFirst
    End If
End Sub

This code works fine
Now I want to make the button for Start it again rather than i run the project again and again. Kindly guide how i make it