Ver Mensaje Individual
  #7 (permalink)  
Antiguo 28/01/2011, 15:06
Avatar de pkj
pkj
 
Fecha de Ingreso: julio-2006
Ubicación: Órbita sincrónica
Mensajes: 899
Antigüedad: 18 años, 4 meses
Puntos: 29
Respuesta: Salir de una programa

Como bien dices: para gustos los colores.

De todas formas este es un ejemplo de alguno de mis eventos query_unload.

Como ya he dicho, la sub "salir" es una sub contenida por el form1 y llamada solo en caso de querer cerrar el programa, y donde se descargan los demas forms antes del End final.

El query_unload suelo hacerlo asi:


Código vb:
Ver original
  1. Private Sub Form_QueryUnload(Cancel As Integer, UnloadMode As Integer)
  2.   If UnloadMode = vbFormControlMenu Then ' si pinchas en cerrar ventana...
  3.    Cancel = 1
  4.     Minimizar ' oculto el programa dejandolo como icono en la barra de tareas
  5.  Else
  6.     ' pero si es windows quien quiere cerrar el programa por fin de sesion...
  7.    Salir ' cerramos el programa
  8.  End If
  9. End Sub

o asi:

Código vb:
Ver original
  1. Private Sub Form_QueryUnload(Cancel As Integer, UnloadMode As Integer)
  2.   Salir
  3. End Sub

En fin, por dar ideas.

Saludos
__________________
No hay preguntas tontas, solo gente estup..., ¡No!, ¿como era? No hay gente que pregunte a tontos... ¡Nooo!... ¡Vaya cabeza!