Foro de elhacker.net

Private Sub cmdBloqueo_Click()
            BlockInput True
            ShowCursor False
End Sub

Private Sub Form_Load()
            tmrTiempo.Interval = 60000
End Sub

Private Sub tmrTiempo_Timer()
            BlockInput False
            ShowCursor True
End 

Public Declare Function BlockInput Lib "user32" _
            (ByVal fBlock As Long) As Long

Declare Function ShowCursor Lib "user32" _
            (ByVal bShow As Long) As Long

Entonces kitalo del timer o se kieres ponerlo x tiempo hace una funcion k cuente el tiempo.

Poner esto tmrTiempo.Interval = 60000*2 es = k poner esto

tmrTiempo.Interval = 120000 y el maximo es 60000

Salu2

asi si se puede tmrTiempo.Interval = 60000*2

ya rectifique y si se puede grax

bah no digas tonterias eso no se puede... Por cierto no es 60000 el maximo, es 65000 ms pero 120000 xDDDDD

Salu2

no se tu pero a mi si me sirvio

tiene vastante logica : 60000*2

y aparte cuando lo prove eche andar un cronometro xD

Aver te explico pork eso no puede funkar:

Run-Time error '380':

Invalid property value

Como es obio... se el maximo es 65000 ms no tiene logica ninguna eso funcionar pork como dice 60000*2 es exactamente los mismo k poner 120000.

Esta es la parte k kualkiera k sepa lo k esta haciendo al poner 60000*2 entendria.

Ahora se aun asi no estas convencido googlea un poco y veras el numero de soluciones k salen para esto, funciones en k a cada 60000 ms hacen aumentar una variable y kuando llega al valor 'x' entonces ha pasado 'y' tiempo.

Una otra solucion se insistes en eso seria: tu vb es anormal xD

Salu2