Cerrar From despues de Time
Publicado por by Tony_mty (55 intervenciones) el 20/05/2005 15:21:38
hola tengo el sigiente codigo ::: si me cierra el form pero no me lo muestra osea solo le doy ejecutar y se espera 5 seg en blanco la pantalla no sale el form y despues se detiene el proyecto como le hago para que se vea o algun otro codigo para cerrar un form porfa
Private Sub pausa()
Dim comenzar
Dim controlar
comenzar = Timer
Do Until controlar >= comenzar + 5
controlar = Timer
DoEvents
Loop
End
End Sub
Gracias de antemano
Private Sub pausa()
Dim comenzar
Dim controlar
comenzar = Timer
Do Until controlar >= comenzar + 5
controlar = Timer
DoEvents
Loop
End
End Sub
Gracias de antemano
Valora esta pregunta


0