Visual Basic - DETECTAR MOVIMIENTO DEL MOUSE

HOLA AMIGOS TENGO UNA APLICACION Y LA QUIERO CONVERTIR EN UN
PROTECTOR DE PANTALLA PARA ESO LA APLICACION SE INICIA MINIMIZADA
ENTONCES COMO PUEDO DETECTAR EL MOVIMIENTO DEL RATON SI EL
FORMULARIO ESTA MINIMIZADO

MUCHAS GRACIAS POR LA AYUDA

'con un objecto timer, y la funcion GetCursorPos del User32.dll
'para probar, pegar esto en la declaracion general.


Option Explicit

Private Type POINT
x As Long
y As Long
End Type

Private Declare Function GetCursorPos Lib "user32.dll" (pt As POINT) As Long


Private Sub Timer1_Timer()

Dim pt As POINT
GetCursorPos pt ' 'x' e 'y' son siempre valores en pixeles.

' mover el cursor a la parte superior-izquierda de la pantalla.
If pt.x < 500 And pt.y < 500 Then
Me.WindowState = vbNormal
Else
Me.WindowState = vbMinimized
End If

End Sub

Gracias compañero eso es lo que estaba buscando por
casualidad no me podrias informar sobre las constantes de los api de
windows de como usarlas cuales son sus funciones o donde podria conseguir informacion sobre esto.yo copio la declaracion del visor api pero no se que
constantes son las que se usan para esa declaracion
gracias de todos modos