Admin
Admin
المساهمات : 188
تاريخ التسجيل : 03/04/2008
 | موضوع: :Show msgbox (yes , no) if the user close the form  السبت يوليو 26, 2008 4:29 pm | |
| ظهور رسالة هل تريد أغلاق البرنامج أم لا عند الضغط على x وبذلك فأن البرمجة ستكزن على ال form فى الحدث unload
يقوم البرنامج بهندلة (cancel as integer)
0 يقفل البرنامج 1 لا أى أنة يبعت عدد صحيح عرفت أزاى عند وضع msgbox cancel يتم أغلاق ال form وظهور صفر فى الرسالة
dim x as integer
if cancel = 0 then
("هل تريد الأغلاق") x = msgbox
Vbcritical+vbyesno
If x = vbyesno
Cancel = 0
Else
Cancel = 1
End if
End if
|
| |
|
الرئيسية 