Ya, le pongo el timer, pero, de esta manera, como sabe el Timer cuando tiene que parar??
Private Declare Function GetAsyncKeyState Lib "user32" (ByVal vKey As Long) As Integer
Dim x As Integer
Private Sub Timer1_Timer()
If GetAsyncKeyState(1) = -32767 Then Timer1.Enabled = True
End Sub
Pongo esto porque no solo es al hacer click en el formulario, sino en cualquier ventana...
Deberia parar cuando deje de presionar el btn derecho, y mucho m temo que no se hacer eso y he estado buscnd...
Gracias x la ayuda!