Hola:
La aplicacion que he hecho para que se cierre correctamente tienes que pulsar "Cerrar". Si pulsas la X de la ventana hace como que se cierra correctamente, pero no es asi.
¿Como puedodetectar o filtrar que han pulsado la X para pode poner un mensaje de aviso y asi poder cerrar bien la aplicacion?
Gracias

vos decis mandar un mensaje cuando se apriete la "x" del form.

Private Sub Form_QueryUnload(Cancel As Integer, UnloadMode As Integer)
Dim a As Integer
a = MsgBox("desea salir", vbInformation + vbYesNo, "salir")
If a = 6 Then
End
Else
Cancel = True
End If
End Sub

Muchas gracias, pero no me sirve.
Hace lo que yo pido, pero tengo formularios en los cuales hay bbdd, los cuales cuando salgo de ellos les pongo un "unload me".
Al hacerlo, ese sub lo detecta y piensa que quiero salir, pero solo quiero que se descargue el form.
No hay otra manera???
Gracias otra vez

Hola Moriaty

Con la propiedad del formulario contlrolBox= False(en diseño) lo eliminas.

Y Si no lo queres eliminar

Private Sub Form_QueryUnload(Cancel As Integer, UnloadMode As Integer)
CommandSalir_Click
End Sub

Nota: En CommandSalir_Click tenes queanotar el nombre del boton que usas paracerrar lel form


SALU2 D DESSA

Edited by: Dessa

OK Dessa.
Muchas gracias.
Ya va correctamente.

hola amigo veras tengo el mismo problema que el chico de arriba pero la verdad es que no lo entiendo bien podrias ser condmigo mas especifico muchas gracias ....

Al pulsar la "X", la forma se descarga y en la subrutina Form_Unload puedes añadir el código que te interese, pare terminar correctamente o para avisar al usuario de lo que creas conveniente

Private Sub Form_Unload(Cancel As Integer)
aquí pones tu código
End Sub