View Full Version : سوال: گرفتن تایید برای خروج از برنامه
maminb
یک شنبه 20 بهمن 1387, 18:36 عصر
سلام دوستان. میخوام برنامهای بنویسم که وقتی به هر شکل که میخواهیم آن را ببندیم، با یک Msgbox از ما تاییدیه بگیره. فکر کنم باید در رویداد Form Closing بنویسم. شاید هم اشتباه میکنم. ممنون میشم نحوه این کار و کدشو برام بذارید.
با تشکر.
sari-1369
یک شنبه 20 بهمن 1387, 23:59 عصر
درست دوسته من تو فرم کلوزینگ کد زیر رو بنویس .
e.Cancel = True
If MsgBox("mikhad az barname kharej shavid ?", MsgBoxStyle.YesNo) = MsgBoxResult.Yes Then
End
End If
maminb
دوشنبه 21 بهمن 1387, 15:53 عصر
یه دنیا ممنونم. مرسی دوست من!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!:قلب:
nokhodsiah2001
دوشنبه 21 بهمن 1387, 16:13 عصر
سلام
از این متد هم میتونی استفاده کنی البته بسته به نیازت باید تغییرش بدی
Private _closeClick As Boolean
Public Const SC_CLOSE As Integer = 61536
Public Const WM_SYSCOMMAND As Integer = 274
Protected Overloads Overrides Sub WndProc(ByRef m As Message)
Dim mas As New CMessageBox
' Dim intreturnvalue As Integer
If m.Msg = WM_SYSCOMMAND AndAlso m.WParam.ToInt32 = SC_CLOSE Then
Msgbox(" برای خروج اطمینان دارید")
Me._closeClick = True
End If
' End If
MyBase.WndProc(m)
End Sub
maminb
دوشنبه 21 بهمن 1387, 18:22 عصر
سلام
از این متد هم میتونی استفاده کنی البته بسته به نیازت باید تغییرش بدی
Private _closeClick As Boolean
Public Const SC_CLOSE As Integer = 61536
Public Const WM_SYSCOMMAND As Integer = 274
Protected Overloads Overrides Sub WndProc(ByRef m As Message)
Dim mas As New CMessageBox
' Dim intreturnvalue As Integer
If m.Msg = WM_SYSCOMMAND AndAlso m.WParam.ToInt32 = SC_CLOSE Then
Msgbox(" برای خروج اطمینان دارید")
Me._closeClick = True
End If
' End If
MyBase.WndProc(m)
End Sub
ممنون. ولی میشه یه ذره بیشتر توضیح بدید؟
vBulletin® v4.2.5, Copyright ©2000-1403, Jelsoft Enterprises Ltd.