VB Code:
  1. Private Sub Form1_LostFocus(ByVal sender As Object, ByVal e As 

  2. System.EventArgs) Handles MyBase.LostFocus

  3.  
  4. 'Enable/Disable the timer

  5.  
  6. End Sub

  7.  
  8.  
  9. Private Sub Form1_GotFocus(ByVal sender As Object, ByVal e As 

  10. System.EventArgs) Handles MyBase.GotFocus

  11.  
  12. 'Enable/Disable the timer

  13.  
  14. End Sub