no funciona cancelar salir en MDIForm_QueryUnload
Publicado por cris (10 intervenciones) el 10/10/2007 12:44:04
Hola, tengo un problema. he estado buscando información sobre cómo eliminar el botón X del mdi, pero lo que he encontrado ( las funciones que hay en éste foro), no me funcionan. no me da error, pero pasa de mí completamente.
Sé que el evento queryunload es para salir ya, pero he puesto éste código:
Dim i as integer
i=msgbox("Desea salir del programa?", vbOkCancel
if i = 1 then
unload me
basededatos.close
end if
si le doy a cancel, i = 2, pero de todas formas, sale del programa. ¿Qué puedo hacer? ya que el botón X en el mdi no me deja quitarla?
muchas gracias.
Sé que el evento queryunload es para salir ya, pero he puesto éste código:
Dim i as integer
i=msgbox("Desea salir del programa?", vbOkCancel
if i = 1 then
unload me
basededatos.close
end if
si le doy a cancel, i = 2, pero de todas formas, sale del programa. ¿Qué puedo hacer? ya que el botón X en el mdi no me deja quitarla?
muchas gracias.
Valora esta pregunta
0