-

[xadap]

-

[Thaorius]

Si te referis a cuando el usuario hace click en la X de cerrar ventana, tenes que ponerlo en el evento QueryUnload.

Y para que no cierre pone Cancel = true

Saludos

[NYlOn]

en el Unload del From:

Código [Seleccionar] Expandir


Private Sub Form_Unload(Cancel As Integer)
    Dim Respuesta As String
    Respuesta = MsgBox("CERRAR?", vbQuestion + vbYesNoCancel, "NYlOn xD")
    Select Case Respuesta
        Case vbYes
            'guardar y cancelar descarga
            Cancel = 1
        Case vbNo
            End 'terminar programa
        Case vbCancel
            Cancel = 1 'cancelar descarga
    End Select
End Sub


salu2

G0nz4