semplice istruzione

[deste]

Private Sub Form_Unload(Cancel As Integer)

risposta = MsgBox("sei sicuro di voler uscire?",vbyesno,"Uscire?")

If risposta = vbNo Then
Form1.show ' ritorna a Form1

ElseIf risposta = vbYes Then
End
End

End Sub