[Amin_Mansouri]

من برای بسته شدن برنامه یه دکمه exit گذاشتم و یه پیغام میاد که آیا مایلید برنامه رو ترک کنید .اگه کاربر دکمه yes رو بزنه از برنامه خارج میشه و اگه no رو بزنه از برنامه خارج نمیشه. تا این جا مشکلی نیست. ولی اگه کاربر دکمه close یا همون ضربدر قرمز گوشه فرم رو بزنه بدون هیچ سئوالی برنامه بسته میشه.چیکار کنم که اگه کاربر اون ضربدر قرمز گوشه فرم روزد هم همون سئوال اول پرسیده بشه و اگه کاربر تایید کرد از برنامه خارج بشه؟

کد:

Private Sub Form_Unload(Cancel As Integer)
Dim a As Integer
a = MsgBox("Parvin", vbYesNo)
If (a) = "6" Then
End
Else
Cancel = -1
End If
End Sub