Private Declare Function KillTimer Lib "user32" Alias "KillTimer" (ByVal hwnd _
  As Long, ByVal nIDEvent As Long) As Long
 
 
Private Sub ResetTimer(Byval hWnd As Long)
 
    KillTimer hWnd,  "hier die definierte Konstante einsetzen"
End Sub