como hacer que el formulario solo se vea una vez?
RIGEL
19 de Junio del 2004
hola a todos!
tengo un programa que quiero que se ejecute cada vez que enciendo mi pc, pero quiero que me aparesca el formulario solo la primera vez que se ejecuta el programa, despues de la primera ya no quiero verlo.
alguien sabe como hacer para que solo la primera vez se vea el formulario?? ?
tengo un programa que quiero que se ejecute cada vez que enciendo mi pc, pero quiero que me aparesca el formulario solo la primera vez que se ejecuta el programa, despues de la primera ya no quiero verlo.
alguien sabe como hacer para que solo la primera vez se vea el formulario?? ?
Bartolom
19 de Junio del 2004
Supongamos que el formulario principal de tu propgrama se llame frmPrincipal.
Luego, creas un módulo en el cual insertas el siguiente procedimiento:
Sub main()
Dim endTime As Variant
endTime = Now + TimeValue("00:00:01")
frmPrincipal.Show
frmPrincipal.Refresh
Do While Now < endTime
DoEvents
Loop
frmSplash.Hide
End Sub
En el item TimeValue("00:00:01") eliges los segundos que quieres que dure el splash, en este caso serÃa 1 segundo.
Luego el form se oculta y queda ejecutándose en segundo plano
Luego, en el menú Proyecto, Propiedades del Proyecto, en la pestaña General, Objeto Inicial, tienes que elegir sub Main, de modo que tu proyecto inicie con el procedimiento Main escrito más arriba.
Luego, creas un módulo en el cual insertas el siguiente procedimiento:
Sub main()
Dim endTime As Variant
endTime = Now + TimeValue("00:00:01")
frmPrincipal.Show
frmPrincipal.Refresh
Do While Now < endTime
DoEvents
Loop
frmSplash.Hide
End Sub
En el item TimeValue("00:00:01") eliges los segundos que quieres que dure el splash, en este caso serÃa 1 segundo.
Luego el form se oculta y queda ejecutándose en segundo plano
Luego, en el menú Proyecto, Propiedades del Proyecto, en la pestaña General, Objeto Inicial, tienes que elegir sub Main, de modo que tu proyecto inicie con el procedimiento Main escrito más arriba.