Use the GetTickCount API. It return the number of miliseconds that Windows has been running.
VB Code:
  1. Private Declare Function GetTickCount Lib "kernel32" Alias "GetTickCount" () As Long