___
كيف الحال مبعدين أرض الإبداع :36: ,؟
__

هـذا ثالث موضوع لي وأتمنى لكم الإستفادة .,
http://www8.0zz0.com/2012/05/18/13/340000055.png
ماهو close : هو بلغة الفيجوال بيسك 6 يسمى unload ووضيفته اغلاق فورم معين
http://www8.0zz0.com/2012/05/18/13/340000055.png
في الـvb6عندما نريد مثلا فورم 2 يغلق فورم 1 نكتب
كود:
unload form1

في الفورم لود او في زر بالفورم 2 أليس كذلك ؟ ولكن المفاجأة بالـvb.net عندما نقوم بنفس العمل ونكتب :
كود:
form1.close()

يقوم بإغلاق البرنامج كاملا !, وهنا يتسبب بيأس لدى المنتقلين من الفيجوال بيسك 6 إلى الفيجوال بيسك دوت نت حديثا, في هذا الموضوع سنقوم بشرح عدة أمور منها :
1- لماذا يحدث ذلك ؟
2- ما الحل ؟
3- تطبيق الحل.
http://www8.0zz0.com/2012/05/18/13/340000055.png
لماذا يحدث ذلك ؟
في الفيجوال بيسك 6 يتم تسهيل الأمور عليك ولكن بالفيجوال بيسك دوت نت يقوم بتفصيل الأمور أكثر فأكثر وبنفس الوقت أسهل وأسرع ! , ..
لم تفهمني ؟, فلنوضح ما المقصود :
بالفيجوال بيسك 6 يقوم بعمل EntryPoint غير الـform1 ليسهل عليك عملية unload ولكن بالفيجوال بيسك دوت نت فهذا الخيار ليس متاح ! ,
http://www8.0zz0.com/2012/05/18/13/340000055.png
ما الحل ؟
الحل هو أن نصنع الـEntryPoint ويكون خفيف ومخفي بنفس الوقت ! ,
http://www8.0zz0.com/2012/05/18/13/340000055.png
ولكن لقد عملت مشروع كبير ولا أستطيع حذف فورم1 !!
لا عليك لن تحتاج لحذف الفورم1
http://www8.0zz0.com/2012/05/18/13/340000055.png
حآن وقت التطبيق والشرح !
أفتح مشروعك بالـvb.net وقم بإضافة فورم جديد بأسم EntrryPoint وأجعله هكذا :
http://www.iraqup.com/up/20121101/CN..._816516717.jpg
وأضف فيه الكود التالي :
كود:
Private Sub EntrryPoint_Load(sender As Object, e As EventArgs) Handles MyBase.Load ' بداية السب
Form1.Show() 'إظهار الفورم1
Me.Opacity = 0 'شفايفية كاملة
Me.Hide() ' إخفاء الفورم
Me.ShowInTaskbar = False
'عدم ظهور الفورم (الانتري بوينت الجديد) بالتاسكبار
End Sub 'إنهاء السب
الآن كمشروع لي اصبح لدي 3 فورمات :
1- الفورم1 (واجهة البرنامج) :
http://www.iraqup.com/up/20121101/7F..._590798487.jpg
الفورم 2 (الذي تغلق الفورم 1) :
http://www.iraqup.com/up/20121101/cj..._371467645.jpg
والفورم EntrryPoint أو الانتري بوينت الجديد :
http://www.iraqup.com/up/20121101/CN..._816516717.jpg
http://www8.0zz0.com/2012/05/18/13/340000055.png
الآن إذهب إلى قائمة Project ثم XXXX properties :
http://www.iraqup.com/up/20121101/8i..._670813676.jpg
إذهب إلى Startup from وأختر EntrryPoint :
http://www.iraqup.com/up/20121101/w6..._653908716.jpg
الأن إحفظ المشروع :
http://www.iraqup.com/up/20121101/QQ...8_35722781.jpg

شغل المشروع :
http://www.iraqup.com/up/20121029/o3..._408199981.jpg
أنظر إلى النتيجة !,
تم إغلاق الفورم 1 بدون أن يغلق البرنامج ..
http://www8.0zz0.com/2012/05/18/13/340000055.png
ملاحظة : الإنتري بوينت الجديد إذا تم إغلاقه يتم إغلاق البرنامج كاملا!
http://www8.0zz0.com/2012/05/18/13/340000055.png

والسلام عليكم ورحمة الله وبركاته ..
Dr.EvilCoderSc
:38: