 in there is a API call which is defined in a Type Library!
   '
   
   ' dwUser is set to the window of our hidden window,
   ' &amp;H2C67&amp; is the MyTimerMessage constant, hardcoded here
   ' jic that causes VB code to run :)
   PostMessage dwUser, &amp;H2C67&amp;, 0, 0
   
End Function
Public Function WindowProc( _
      ByVal hwnd As Long, ByVal iMsg As Long, _
      ByVal wParam As Long, ByVal lParam As Long _
   ) As Long
Dim lC As Long
Dim i As Long
Dim cHRT As cHiResTimer
Dim lPtr As Long

   If 