[vb6] uscire da una funzione o sub

[kalosjo]

Se noti l'evento unload ha un parametro (Cancel).
Settando cancel a 1 non si esce....
Ovviamente bisogna gestirlo, altrimenti non esce mai.

Esempio:

if msgbox("Vuoi uscire?",vbYesNo)=vbNo then
  cancel=1
end if