ABCdatos
Programas y tutoriales
en castellano
ABCdatos tu página de inicio Inicio       
Su navegador rechazó un objeto incrustado.
Su navegador no soporta objetos incrustados. Vea los últimos mensajes en el foro.
PUBLICIDAD


Cerrar un formulario

     
Fuente: lacarcel
     
  • Descripción
  • Opiniones
  • Recomendar

PUBLICIDAD
Al cerrar un form, podemos saber si es nuestro código el que cierra la aplicación o bien se cierra por otra causa.

Esta comprobación se hace en Form_QueryUnload y puede ser:

QueryUnload Method
Constant Value Description

vbFormCode 1 Unload method invoked from code.

vbAppWindows 2 Current Windows session ending

vbFormMDIForm 4 MDI child form is closing because the MDI form is closing

vbFormControlMenu 0 User has chosen Close command from the Control-menu box on a form

vbAppTaskManager 3 Windows Task Manager is closing the application.

'Ejemplo para usarlas:

Private Sub Form_QueryUnload(Cancel As Integer, UnloadMode
As Integer) 'Sólo cerrar si es un mensaje de windows

Select Case UnloadMode

Case vbFormCode, vbAppTaskManager, vbAppWindows

ok, cerrar

Case Else MsgBox "No se permite cerrar la aplicación.",
vbInformation, "Mensajes"

Cancel = True
WindowState = vbMinimized

End Select
End Sub

No hay opiniones de los usuarios. ¡Sé el primero en dar tu opinión! (No requiere registro)

¿Te gusta este truco? ¡Recomiéndaselo a un amigo!

     
     
     
     
     
     
Las direcciones de correo electrónico que se proporcionan en este servicio, solamente serán utilizadas con la finalidad de enviar la recomendación al destinatario. Ni tu dirección de correo ni la de tu amigo/a serán utilizadas para ningún otro propósito.
Trucos del mismo autor Más trucos del mismo autor
Do Events
¿Cuántas veces has asignado a un Label un nuevo Caption y no lo ha mostrado?. Pues prueba poniendo DoEvents después de la asignación y verás como se muestra...
sigue leyendo
Text Box
Este truco se trata de hacer una selección del contenido del textbox, sólo que se calca en él, ya sea o no en array. 'Para un control Private Sub Text1_GotFocus() Text1.SelStart...
sigue leyendo
Redefinir instrucciones de VB
Si declaras una función con el mismo nombre que una ya existente, se usará esa función o instrucción en lugar de la que incluye el VB. Por ejemplo, se trata de una...
sigue leyendo
Ejecutar con Start
Con Start es posible ejecutar aplicaciones desde la línea de comando y si se pueden ejecutar aplicaciones... ¿se podrán ejecutar accesos directos? Así es, y no sólo...
sigue leyendo
¿Dónde está instalado Windows? - Visual Basic
Este programa muestra cómo buscar desde una aplicación Visual Basic dónde se encuentra instalado Microsoft Windows. 1. Crea un nuevo proyecto en VB por defecto será Form1 2...
sigue leyendo
Activar/desactivar el teclado númerico - Visual Basic
Este programa demuestra cómo se puede conectar o desconectar el teclado numérico (NUM LOCK) Pasos a seguir: 1. Crea un nuevo proyecto en visual basic 2. Añade el siguiente...
sigue leyendo

Copyright © 1999-2013 ABCdatos.com. Todos los derechos reservados.
Para información sobre privacidad, consulte la declaración de política de privacidad.
Contactar con ABCdatos.