ستار مقرن
السلام عليكم ورحمة الله وبركاته
عزيزي الزائر: يرجي التكرم بتسجبل الدخول اذا كنت عضو معنا
او التسجيل ان لم تكن عضو وترغب في الانضمام الي اسرة المنتدي
سنتشرف بتسجيلك
وشكرا
ادارةالمنتدي
[

ستار مقرن

منتدى عام
 
الرئيسيةاليوميةس .و .جبحـثالتسجيلدخول
دخول
اسم العضو:
كلمة السر:
ادخلني بشكل آلي عند زيارتي مرة اخرى: 
:: لقد نسيت كلمة السر
بحـث
 
 

نتائج البحث
 
Rechercher بحث متقدم
المواضيع الأخيرة
» شرح طريقة تحديث الجوال (السوفت وير) عن طريق موقع نوكيا
الإثنين ديسمبر 10, 2012 2:05 am من طرف banibrahim

» [ برنامج ] : تخيل زيادة سرعة النت إلـ 10 أضعاف بـ Ashampoo Internet Accelerator v3.10
الثلاثاء مايو 15, 2012 12:29 pm من طرف assel3000

» أفضل برنامج الى حد الان لتحويل ملفات pdf إلى ملف word بشرح كامل ومفصل <فقط على ستار مقرن>
الإثنين أبريل 09, 2012 6:41 am من طرف الصقر الجارح

» WINDOWS 7 SP1 X86 MULTILANG.6X1 PRE ACTIV(EN-AR-NL-IT-FR-NO
السبت أبريل 07, 2012 1:55 pm من طرف الصقر الجارح

» ويندوز7 مع الحزمة لنواة 64 بت 7 لغات منشط -عربي-انكليزي-هولندي-الماني-ايطالي-فرنسي- بقسم أنظمة التشغيل ويندوز في منتديات داماس تتمة الموضوع: http://www.damasgate.com/vb/t223535/#ixzz1rOFMHBXm
السبت أبريل 07, 2012 1:53 pm من طرف الصقر الجارح

» باسكل Pascal
الجمعة أبريل 06, 2012 1:32 pm من طرف الصقر الجارح

» مسائل محلولة في البرمجة 1
الجمعة أبريل 06, 2012 1:22 pm من طرف الصقر الجارح

» دورة الباسكال عربية بالفديو حصريا
الجمعة أبريل 06, 2012 9:20 am من طرف الصقر الجارح

» برنامج فك كلمه السر لملفات الورد Rixler Word Password Recovery Master 3.5.0.3
الخميس مارس 01, 2012 11:09 am من طرف الصقر الجارح

المتواجدون الآن ؟
ككل هناك 2 عُضو متصل حالياً :: 0 عضو مُسجل, 0 عُضو مُختفي و 2 زائر

لا أحد

أكبر عدد للأعضاء المتواجدين في هذا المنتدى في نفس الوقت كان 21 بتاريخ الجمعة يونيو 22, 2012 12:03 pm
تصويت
أفضل 10 أعضاء في هذا المنتدى
الصقر الجارح
 
عباس لموشي
 
mohamed ziad
 
taha aaa
 
soufiane
 
kelrafie
 
noorsalam
 
كوكو نشات
 
saad.1987
 
banibrahim
 
سحابة الكلمات الدلالية
نوكيا قاموس موكا Beta naruto service suite الثانى برامج تحميل لعبه العاب الثاني Shippuden 6300 الاول برنامج يوغي ألعاب حلقات ناروتو تمارين لعبة الجزء عربي باتش

شاطر | 
 

 حصريا شرح بالصور لطريقة عمل برنامج لاغلاق الجهاز بالفجوال بيسك+المشروع

استعرض الموضوع السابق استعرض الموضوع التالي اذهب الى الأسفل 
كاتب الموضوعرسالة
الصقر الجارح
Admin


ذكر عدد المساهمات : 354
تاريخ الميلاد : 17/02/1992
تاريخ التسجيل : 17/07/2009
العمر : 24
المزاج : جيد

مُساهمةموضوع: حصريا شرح بالصور لطريقة عمل برنامج لاغلاق الجهاز بالفجوال بيسك+المشروع   الخميس يوليو 23, 2009 9:41 am

السلام عليكم ورحمة الله وبركاتة
تحية طيبة اخواني المشاغبين
قدملكم درس لطريقة عمل برنامج بالفجوال بيسك مع الشرح الممل بالصور
كفانة كلامأ ولندخل في صلب الموضوع

افتح الفجوال بيسك الذي سبك تنصيبة على جهازك ومن ليس لديه الفجوال بيسك يستطيع تحميلة
من الموضوع التالي من اخونة المقني
http://www.absba.org/showthread.php?t=650173

بعد ما فتحنا الفجوال بيسك نختار مشروع ستنادرد كما توضحه الصورة



بعد ذلك سوف يضهر لنا فورم رقم وحد form يعني الشكل او اطار البرنامج كما في الصورة التالية



نقوم بتغير اسم الفورم من خصائصة ومن الخاصية caption كما توضحه الصورة التالية



سنلاحظ ان اسم الفورم قد تغير كما في الصورة التالية


والان نقوم بادراج ادة الي الفجوال بيسك سمها Microsoft Shell Control
ولادراجها نتبع الخطوات التالية

من الخيار بروجكت الموجود بالاعلى Project نختار كما في الصورة التالية


سوف تضهر نافذة جديدة نبحث عن الاداة المطلوبة ونضيفها بالضغط على الز اوكي



سنلاحظ ان هذه الاداة تم اضافتها الى الادوات


نضغط على الاداة التي تم اضافتها دبل كلك لاضافتها الي البرنامج



سنلاحظ ان شئ ما قد انضاف على شكل اطار

الان نضيف زر كما توضحه الصورة بالضغط دبل كلك على الاداة command button


سنلاحظ انها انضافت



نغير اسمها من خاصية caption الى shutdown



ثم دبل كلك على الزر,سوف تنفتح لنا صفحة الكود



الان نضيف الكود


وها هو الكود



كود:
Dim shll32 As New Shell

كود:
If MsgBox("Shut Down your PC?", vbExclamation + vbYesNo, "SHELL32") = vbYes Then
shll32.ShutdownWindows
End If
شرح الكود بالتفصيل الممل
السطر الاول Dim shll32 as new shell
لقد قمنا بتعريف الاداة المدرجة على انها نوع جديد من الدوال من النوع shell التي تستخدم لاستدعاء ملف موجود بالنظام
والسطر الثاني استخدمنا قاعدة IF الشرطية ومعها رسالة ذات الخيارين yes and no
وعلامية اليساوي والكواد الذي بعدها يعني اذا المستخدم ضغظ على يس فقوم
باستعداء الملف الموجود بالسطر الاخير وهو المسؤال عن اغلاق الجهز واذا
اختار نو فتجاهل ذلك
واخر شئ
End if لانهاء عبارة الشرط

والان بعد ان اضفت الكود الي مشروعك
عدل البرنامج كما تريد
وبعد التعديلات سوف يكون بهذا الشكل



الان تقوم بتشغيل البرنامج لتجربتة
بالضغط على زر التشغيل كما توضحه الصورة



وبعد الضغط على زر لاطفء ستضهر لنا الرسالة الاطفاء


والان مبروك عليك عملت برنامج بسيط سهل بالفجوال بيسك


ولتحميل المشروع كامل مع الاكواد

يتفضل بالتحميل من هنا

http://www.2shared.com/file/3922720/...utdown_pc.html

السلام عليكم
لاتنسو الردود

الرجوع الى أعلى الصفحة اذهب الى الأسفل
 
حصريا شرح بالصور لطريقة عمل برنامج لاغلاق الجهاز بالفجوال بيسك+المشروع
استعرض الموضوع السابق استعرض الموضوع التالي الرجوع الى أعلى الصفحة 
صفحة 1 من اصل 1

صلاحيات هذا المنتدى:لاتستطيع الرد على المواضيع في هذا المنتدى
ستار مقرن :: منتدى الكومبيوتر :: منتدى شرحات البرامج والبرمجة-
انتقل الى: