Call Command1_Click
Call Command2_Click
Call Command3_Click
Call Command4_Click
Call Command5_Click
Pero quiero darles tiempo de 60 seg para que el usuario pueda ver las ventas que puedo hacer para que eso pueda suceder




| ||||
Me mareo un poco el comentario pero creo que entendi... Lo que podes hacer es poner el control Timer, dale un valor a la propiedad intervalo = 500, o lo que te parezca; Usas un label o algo para tomar el tiempo del sistema con la funcion Now() o la funcion Time() y despues la funcion If.. Ej: Tiempo= Second(Time) ' Simplemente toma los segundos de la hora If Second(Time) + 60 > 59 Then ' Se fija si el tiempo original + el agregado se pasa de los 59 segundos Tiempo = Tiempo - 60 ' Aca se le resta 60 en caso afirmativo If Second(Time)>= Tiempo Then ' Mira si lo que queremos se cumple Unload me ' desaparece el Form Actual Frm_Segundo.Show = True ' Carga otro form End IfEnd If Nota: Tiempo no lo declare como variable porque no lo es, en realidad se Teimpo es una variable jamas se cumplira el IF porque a los segundos actuales se le van a sumar 60 asi que nunca va a hacer lo que qeuremos, te aconsejo que uses otro metodo como un label como testigo Última edición por piojoman; 30/09/2005 a las 06:42 |