display how many seconds windows has been running

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

Related posts:

1. how many seconds windows has been running ‘display how many seconds windows has been running Private Declare...
2. system startup time Learn more about system startup time by visiting our website....
3. Windows directory Learn more about Windows directory by visiting our website....
4. display system colors Learn more about display system colors by visiting our website....
5. shutdown windows 200 Learn more about shutdown windows 200 by visiting our website....

Related posts brought to you by Yet Another Related Posts Plugin.

This entry was posted on Saturday, December 20th, 2008 at 8:56 pm and is filed under VB. You can follow any responses to this entry through the RSS 2.0 feed. Responses are currently closed, but you can trackback from your own site.