Visual Basic Programming Code Examples
Visual Basic > Code Snippets Code Examples
Display how many seconds windows has been running
Display how many seconds windows has been running
Private Declare Function GetTickCount& Lib "kernel32" ()
Private Sub Form_Load()
Dim lngReturn As Long
lngReturn = GetTickCount()
MsgBox ("Windows has been running for " & (lngReturn / 1000) & " seconds.")
End Sub