Private Declare Function SetTimer Lib "User32" (ByVal hWnd As LongLong, ByVal nIDEvent As LongLong,
ByVal uElapse As LongLong, ByVal lpTimerFunc As LongLong) As LongLong
Private Declare Function KillTimer Lib "User32" _
(ByVal hWnd As LongLong, ByVal nIDEvent As LongLong) As LongLong