Programación General => Visual Basic 6.0 e inferiores => Mensaje iniciado por: neorent en Viernes 10 de Marzo de 2006, 13:18
Título: Problemas Para Cerrar La Aplicacion
Publicado por: neorent en Viernes 10 de Marzo de 2006, 13:18
hola a todos como estan espero que bine bueno le paso a comentar, tengo un formulario el cual transforme en ejecutable, cuando lo ejecuto funciona sin problemas, cree un boton salir, pero el formulario tambien una X la cual te permite cerrar la aplicacion pero resulta que igual queda en proceso como hago para que cuando un usuario cierre desde la X el la aplicacion se cierre y no quede en memoria?, espero que me puedan ayudar gracias y saludos adios :hola:
Título: Re: Problemas Para Cerrar La Aplicacion
Publicado por: Jose Arriagada en Viernes 10 de Marzo de 2006, 13:45
Tienes dos alternativas.
1). Eliminar el boton "x" de cierre de la aplicacion
2). Colocar codigo para que al momento de cerrar la aplicacion, explicitamente tu la termines.
Para la opcion 1: En la propiedad CONTROLBOX del formulario, colocala en FALSE
Para la opcion 2: Utiliza el siguiente codigo.
Private Sub Form_QueryUnload(Cancel As Integer, UnloadMode As Integer) Select Case UnloadMode Case vbFormCode MsgBox "Cierre desde la aplicacion" Case vbAppWindows MsgBox "Termina la sesion de windows" Case vbFormMDIForm MsgBox "MDI principal se cierra" Case vbFormControlMenu MsgBox "Usuario utiliza control menu para cerrar" Case vbAppTaskManager MsgBox "Cierre desde el Administrador de tareas" End Select 'Si no deseas que termine entonces, cambia Cancel=1 'Cancel = 0
'Si deseas en que termine, independiente de lo que haya pasado, 'entonces agregar 'END End Sub
Título: Re: Problemas Para Cerrar La Aplicacion
Publicado por: Makko en Viernes 10 de Marzo de 2006, 17:28
Bueh, no queda mas nada que agregar a lo que te respondio Jose. :kicking:
Título: Re: Problemas Para Cerrar La Aplicacion
Publicado por: tiquinho en Viernes 10 de Marzo de 2006, 19:53
O en el Form_Unload, ejecuta tú el botón Cerrar:
Código: Text
Private Sub Form_Unload (Cancel As Integer)
cmdCerrar_Click
End Sub
(No me acuerdo bien de la cabecera del Form_Unload, pero creo q sólo era eso)