SoloCodigo
Programación General => Visual Basic 6.0 e inferiores => Visual Basic para principiantes => Mensaje iniciado por: todook en Martes 5 de Diciembre de 2006, 18:52
-
no hay mucho mas que decir nada mas que como se pone que restricciones tiene y eso lamentablemente no tengo la ayuda y lo necesito al que me pueda ayudar muchas gracias....saludos!!!!
-
Utiliza un timer, o el API Sleep
-
Yo lo hago con esto. No necesita ningún complemento ni API:
--------------------------------------
Public Sub ESPERAR(S As Single)
Dim T1 As Single
T1 = Timer
Do While T1 + S > Timer
DoEvents
Loop
End Sub
--------------------------------------
Tenés que ubicarla en un módulo para que sea accesible desde cualquier parte del proyecto.
El argumento que le pasás es la cantidad de segundos a esperar:
para que espere 3 segundos: "ESPERAR 3", o "Call ESPERAR(3)".
Te hago notar la presencia de "DoEvents" que permite que se ejecuten otros eventos del mismo programa o de otro cualquiera mientras se cumple el tiempo. De otra forma la PC se congela y parece "colgada" hasta que se cumpe la espera.
Saludos.