SoloCodigo

Programación General => Visual Basic 6.0 e inferiores => Mensaje iniciado por: Majuhemo en Martes 8 de Abril de 2003, 20:16

Título: Re: Hacer Pausa...
Publicado por: Majuhemo en Martes 8 de Abril de 2003, 20:16
Hola a todos..
muchas gracias por anticipado.
Como puedo hacer para que mi codigo se detenga un momento, es decir, si tengo un:

For i= 1 to 50000
      if i = 25000 then
         ' ** detente unos 5 segundos y luego sigue **
      end if
next i

muchas gracias..
Título: Re: Hacer Pausa...
Publicado por: J.M.Movilla en Martes 8 de Abril de 2003, 20:31
Con esta librería

Public Declare Function SleepEx Lib "kernel32" (ByVal dwMilliseconds As Long, ByVal bAlertable As Long) As Long

Y defines dos variables como Long, por ejemplo:
Public nTime As Long
Public Sleep As Long

(si pones esta librería y esta definición de variables en un módulo, te servirán para toda la aplicación)


Cuando te interese hacer una pausa, das a nTime un valor EN MILISEGUNDOS; por ejemplo:
nTime = 2000   ' para 2 segundos
 
y la llamada sería

Sleep = SleepEx(nTime, 1)

Saludos
Título: Hacer Pausa...
Publicado por: Majuhemo en Martes 8 de Abril de 2003, 21:25
muchas gracias,....
es lo que necesitaba....

saludos;:good: