نمایش Message Box با دو دکمه Yes و No

[mohammad pro]

با سلام؛

من در يك form قصد دارم كه يك دكمه بذارم كه وقتي روي اون كليك مي كنم (Exit)

يك پيغام يعني اين


Are You Sure You Want to Exit

با دكه yes و no بياد.

حالا اگه yes بزنم خارج بشه و no هم كه هيچي

از اين برنامه براي خروج استفاده ميشه در همه سايت ها

راهنمايي فرماييد

[M.T.P]

Private Sub Form_Unload(Cancel As Integer)
If MsgBox("Exit?", vbYesNo) = vbNo Then Cancel = 1
End Sub

[returnx]

کدی که M.P.T گذاشتند برای دکمه ضربدر پنجره هست.
این کد هم برای دکمه ای که خودت تو برنامه میزاری:

Beep
response = MsgBox("Are You Sure You Want to Exit?", vbYesNo + vbQuestion)
If response = vbYes Then
End
End If