Module Module1 Declare Function GetTickCount Lib "kernel32" Alias "GetTickCount" () As Integer End Module