programar boton cerrar

[Kruzado]

coloca el codigo que tienes el boton en el evento unload del formularios ej

command1.click
x=msgtbox("desea salir"?")
bla bla bla

end sub

Private Sub Form_Unload(Cancel As Integer)
x=msgtbox("desea salir"?")
bla bla bla

End Sub

ojo que si sales por el boton y descargas el form, te va a volver a preguntar, asi que solo deja la pregunta en el evento unload

facil y bonito