[parvin]

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

[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

[parvin]

دستت درد نکنه. درست شد.

[parvin]

یه مشکل برای برنامم پیش اومده. وقتی کاربر دکمه خروج رو میزنه دو بار پیام میاد که ایا برای خروج از برنامه مطمئن هستید . یه بار پیامی که تو خوددکمه خروج گذاشتم و یه بار هم پیامی که تو کدی که آقا امین بالاتر داده گذاشتم. چیکار کنم فقط یکیش بیاد ؟

[Amin_Mansouri]

خوب یه پیغام بزار !

[parvin]

من می خوام کاربر چه ضربدر قرمز فرم رو زد و چه دکمه خروجی که خودم رو فرم گذاشتم رو زد ازش تاییدیه خروج بگیره.

[Amin_Mansouri]

حتما یه مقاله وی بی بخون
یک باتن بزار روی فرم بزار بگیم دکمه exit باشه و یک کد هم برای خروج از برنامه :
اینها تو فرمت بنویس :

کد:

Private Sub Command1_Click()
Dim b As Integer
b = MsgBox("Parvin", vbYesNo)
If (b) = "6" Then End
End Sub

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

[parvin]

آقا امین من دکمه خروج دارم تو برنامه. سئوال رو با دقت بخونبد.

[Amin_Mansouri]

من می خوام کاربر چه ضربدر قرمز فرم رو زد و چه دکمه خروجی که خودم رو فرم گذاشتم رو زد ازش تاییدیه خروج بگیره.
یک دکمه خروج برای ضربدر قرمز روی فرم و و یکی هم دکمه خروج !

نمیدونم والا دیگه چی میگین
روش استاندارد اینه یارو یه دکمه واسه خروج میزاره و یه سوال هم واسه خروچ
من متوجه نمیشم

[keyhanifar]

خبـــــــــــ حالا چه کاریه ی دمکه بذار
بعدم اگه خواستی با دکمه که خودت تعریف کردی بسته بشه
توی پراپرتیز فرمت گزینه ControlBox=false قرار بده

خب اینم اگه خواستی اضافه کن کد مینیمم کردنه

Me.WindowState = 1