Visual Basic - Función de espera o algo así

Life is soft - evento anual de software empresarial
 
Vista:

Función de espera o algo así

Publicado por Moisés (133 intervenciones) el 28/11/2002 11:40:43
Hola a todos, ¿sabe alguien si en VB hay alguna función que pare la ejecución del programa durante un tiempo?
Que no sea el componente timer.
Gracias.
Valora esta pregunta
Me gusta: Está pregunta es útil y esta claraNo me gusta: Está pregunta no esta clara o no es útil
0
Responder

RE:Función de espera o algo así

Publicado por J.Fernando (43 intervenciones) el 28/11/2002 14:50:00
Si existe, se llama Sleep. La forma de declararla la puedes encontrar en al Api text Viewer.

Se utiliza de la siguienete manera

Sleep(tiempo), donde tiempo es un valor en milesimas de segundos.

Disculpa por no darte la declaracion precisa, pero en este momento no la recuerdo, pero como te digo en el Api text Viewer puedes encontrarla.

Suerte
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar
sin imagen de perfil

RE:Función de espera o algo así

Publicado por Josetxu (75 intervenciones) el 28/11/2002 14:53:37
Esta sub te servirá para tiempos de espera de menos de un minuto.
Si quieres que la espera dure varios minutos cambia donde he puesto "Second" por "Minute", y si quieres que dure horas deberás de poner "Hour" y en ese caso debe ser "Mod 24" en vez de "Mod 60"

Private Sub Espera(Tiempo As Integer)
Dim Hora1 As Date
Dim Hora2 As Integer
Hora1 = Now()
Hora2 = (Second(Hora1) + Tiempo) Mod 60
Do While Second(Hora1) < Hora2
DoEvents
Hora1 = Now()
Loop
End Sub

La función "DoEvents" pasa el control a windows para que maneje los eventos, es decir que el usuario podrá hacer otras cosas mientras transcurra el "Tiempo" que hayas pasado como parámetro.

Saludos
Josetxu
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar

Aqui la declaracion de Sleep()

Publicado por J.Fernando (43 intervenciones) el 28/11/2002 15:06:52
Private Declare Sub Sleep Lib "kernel32" Alias "Sleep" (ByVal dwMilliseconds As Long)

tambien la puedes declarar de forma publica en un modulo.

Ahi te queda el favor completo, es con mucho gusto
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar