بسته شدن فرم بعد msgbox

[Samira Aria]

سلام...
چه طوری میتونم یه برنامه بنویسم که اگه روی close فرم کلیک شد یه پیغام بده که آیا میخواهید فرم بسته شود؟اگه رو yesکلیک شد فرم بسته بشه اگه noرو زدفرم همون طور بمونه؟
ممنون

[Pr0grammer]

با این کد :

Private Sub Form_Unload(Cancel As Integer)
If MsgBox("Exit Application?", vbYesNo, "Exit") = 6 Then
Cancel = 0
Else
Cancel = 1
End If

End Sub
موفق باشید