برنامه نویسی برای دکمه Exit

[irantkd]

سلام دوستان

چجوری میشه برای دکمه Exit فرم برنامه نوشت . یعنی وقتی روش کلیک شد علاوه بر بستن پنجره جاری ، چندتا کار دیگه هم انجام بده .


http://i34.tinypic.com/z3jfn.gif

[aminbrlee]

دوست من این که کاری نداره
از این کد استفاه ده کنید و دستوراتتون رو بنویسید
مثلا من در این جا به یه متغیر مقدار دادم
که این عمل بعد از زدن اون ضربدر انجام میشه


Private Sub Form_Unload(Cancel As Integer)
a = 20
End Sub

موفق باشید

[اوبالیت به بو]

Private Sub Form_QueryUnload(Cancel As Integer, UnloadMode As Integer)
Cancel = 1
If Cancel = 1 Then
.
.
.
End If
End Sub

[مهران رسا]

Private Sub Form_Unload(Cancel As Integer)
Cancel = True
Di = MsgBox("You Sure ?", vbYesNo + vbQuestion)
If Di = vbYes Then End
End Sub