Visual Basic - Saber cuanto tiempo lleva activo Windows

Hola amigos.....
Nesesito saber cuanto tiempo lleva Windows Activo, datos como Dias, Horas, Minutos, o en realidad cualquier cosa que me sirviera para sacar el calculo de todo eso.... Por favor si alguien sabe de alguna API u otra cosa favor de contestar......

De antemano muchas Gracias...!!!

Declara la siguiente función en un modulo.

Declare Function GetTickCount Lib "kernel32.dll" () As Long

Ahora llama en el codigo de tu form a la función por ejemplo:

Sub Form_load()
Dim Tiempo
Tiempo = GetTickCount ' aqui llamas a la función
label1.caption = Str(Tiempo) ' esto te dara milisegundos.
End sub

'Si quires obtener el valor en:
'segundos: label1.caption = Str(tiempo/1000)
'minutos: label1.caption = Str(tiempo/1000/60)
'horas: label1.caption = Str(tiempo/1000/60/60)
'dias: label1.caption = Str(tiempo/1000/60/60/24)
etc..., espero hayas observado como estan las conversiones...

Esto te va a dar valores con decimales por ejemplo:
10.87597 horas, etc...
Si quieres el valor redondeado entonces en vez de utilizar este signo " / " utiliza este " \ ". Esto te daría 10 horas en vez de 10.87597.

Te recuerdo que este método solo da el tiempo cuando se carga la forma y no se refresca automaticamente. Para eso solo utiliza un TIMER y ya.

Me sirvio te lo agradezco mucho.........
=)