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