دروس : تعلم فيجوال بيسك6 من البداية
بسم الله الرحمن الرحيم
السلام عليكم ورحمة الله...نبدا في هذا الموضوع ساسلة من الدروس في لغة البرمجة Visual Basic تبدأمن نقطة البداية للمبتدئين.
الدرس الأول : التعرف على واجه البرنامج و بعض الخصائص:
الدرس الثاني : الخصـــائـــص
الدرس الثالث : الكــــــود و التعامــل معــه :
درس 4 : تطبيقات متقدمة على الكـــود:
درس5:جعل البرنامج جاهزا ليعمل خارج الجهاز:
الدرس السادس : القوائـــــم :
الدرس 7 : ملفات الocx و التعامل معها :
الدرس 8 : التعامل مع الListو أشباهها:
الدرس 9 : الجملة الشرطية If...Then
الدرس 10 : التعامل مع المسارApp Path :
الدرس11: المتغيرات و الثوابت و المعاملات :القسم الأول
الدرس11: المتغيرات و الثوابت و المعاملات : (الجزء الثاني)
... تابع الجزء الثاني
الدرس الأول : التعرف على واجه البرنامج و بعض الخصائص:
الانطباع الأول :
عندما تفتح الفيجوال لأول مرة و كل مرة ستفتحه فيما بعد ستظهر لك النافذة الأولى دائما وهي نافذة المشروع الجديد (New Project) وستجد فيها ثلاثة تبويبات الأولNew لبدأ مشروع جديد و هو ما سنختاره والثاني Existing وهو لفتح مشروع مصمم مسبقا أي لفتح مشروع سابق و الثالثRecent وهي قائمة بآخر المشاريع المصممة .
المهم من التبويب New اختر مشروع من النوع Standard EXE أي قياسي وهو ما سنعمل به ويكون محدد مسبقا أما المشاريع الأخرى فلن تلزمك حاليا (تلك للمتقدمين).ثم اختر Open و الآن ها أنت في مشروعك الأول و لأول مرة يكون الفيجوال غير منظم نسبيا فيظهر لك نوافذ غير ضورية مثلاً إذا وجدت نافذة يعنوان Form Layout أغلقها لأنها لن تلزمنا و أهم شيء أن يكون هناك نافذة Tool Box أي العناصر و نافذة الخصائص Properties
و هناك نافذة قد لاتظهر وهي نافذة الProject Explorer قد تظهر فيها عدد الصفحات أو النوافذ التي سنصممها..ويمكنك إظهار هذه النوافذ من القائمة View و ستجدها بأسمائها..و الآن بعد أن نظمت واجهة اللغة فلنبدأ.
النوافذ:
في بداية كل مشروع قياسي سيقوم الفيجوال تلقائيا بإضافة نافذة لمشروعك وهي ما يسمى بلغة الفيجوال بال Form(و هي تعني صيغة بالانكليزية ) والآن لا خظ هذه الفورم وتأملها أليست مثل النوافذ التي نراها الآن حاول التحكم بأبعادها من خلال الإحدثيات الخاصة بها في أطرافها ..لا حظ أنها تأخذ الحجم الذي تريده ..وحتى حجم الشاشة بأكملها إن أردت ..و لكنها منقطة من الداخل أليس كذلك لا تخف هذه من الداخل فقط ..و الآن نريد تجرية برنامجنا ..اضغط على F5 من لوحة المفاتيح و لاحظ ها هو مشروعك الآول بين يديك ولكن كمستخدم وليس كمبرمج وهذه الطريقة دائما لتجربو المشروع .
(ملاحظة : يمكنك تشغيل المشروع أيضا بالنقرعلى رمزStart من شريط الأدوات العلوي ..أو من القائمة Run ثم Start..)
و الآن أغلق المشروع من زر الإغلاق في الأعلى (أن قلت المشروع و ليس الفيجوال).
ستلاحظ أنه قد عاد إلى وضع التصميم و الفورم المنقطة..الآن لاحظ اسمها Form 1 لماذا هل هناك Form2؟؟
سيصبح هناك Form 2الآن من القائمة Project اختر Add Formستظهر لك نافذة لإضافة عدة أنواع من الصفحات اختر المحددة وهي Form ثم Open.
و الآن لاحظ ها قد صار المشروع مكون من نافذتين وهكذا ..طبعاً الأنواع الخرى لن نتطرق لها الآن( مثل الModule وهي تسخدم في صناعة الفيروسات لأنها خفية).
لا حظ أنه يمكن التنقل بين الفورم1 Form 1 و الفورم 2 Form 2من خلال نافذة ال Project Explorer لذلك طالبتك بإظهار هذه النافذة في البداية..و الآن لنترك أمر الفورم وعددها وننتقل للتعديل على الفورم نفسها.
الخصائص (من دون توسع لأن لها درس خاص):
عندما تقوم بوضع الفأرة داخل الفورم و النقر ستلاحظ في نافذةProperties أن خصائص الفورم قد ظهرت و بالترتيب فمثلا قم بتعديل الخاصية Caption وهي تعني عنوان الفورم إلى النص الذي تريده حتى ولو كان بالعربية وستلاحظ تغيير عنوان الForm فورا إلى النص الذي أدخلته..
ملاحظة : لاتقم بتعديل الخاصية Name للفورم أو أي عنصر ستعلمه لاحقاُ لأن الفيجوال يتعامل معه على هذا الأساس.
أيضا عدل الخاصية BackColor أي لون الخلفية إلى اللون الذي تريد و لاحظ أنه تغيير لون الفورم إلى اللون المحدد ..
أيضا عدل الخاصة BorderStyle و هي خيارات إلى أحد الخيارات جربها واحد واحد ولا حظ إطار الفورم Form..و جرب النتيجة لكل خيار منها..
و الآن حتى درس الخصائص حاول أن تجرب بعض منها لكي تعرف مهمته وهذه الخصائص طبعاُ نفسها لكل Form.
العناصر و الأدوات:
انتقل الآن إلى صندوق الأدوات Tool Box والذي يحوي رموز قد تكون مألوفة بالنسبة لك...ستجد أن الرمز المختار تلقائيا هو رمز الفأرة Pointer و الآن سنتعرف على هذه الأدوات جربها واحدة واحدة من الأعلى:
اختر أي عنصر وقم برسمه على الفورم بداخلها طبعاُ ثم أذا أردت غير أبعاده كما تغيير أعاد الفورم عن طريق التحكم بأطرافه ..
الأداة Picture Box: أداة لعرض الصور بداخلها جرب أن تضع صورة بداخلها عن طريق النقر عليها لمرة واحدة ثم اتجه لنافذة الخصائص حيث ستجد خصائصها ومن الخاصية Picture اختر صورة من عندك..
الأداة Label: لوضع نص يداخلها غير قابل للتعيدل من قبل المستخدم ..غير الخاصية Caption من خصائصها ثم اكتب ماتريد و لا حظ تغيير النص إلى ما كتبته حتى ولو بالعريبة.
الأداة TextBox: أداة نص قابل للتعديل من قبل المستخدم ..لا تملك خاصية Caption ولكن عوضاُ عنها عدل بالخاصية Text ولاحظ كيف سيتغيير النص بداخلها ..شغل المشروع (F5) وجرب أن تغيير النص فيها كمستخدم.
الأداة Frame: مجرد صندوق لجمع عدد من العناصر للدلالة على مهمة معينة ارسمها على الفورم وستعرف مهمتها وحدك غير أيضا الخاصيةCaption لما تريد...
الأداةCommand(هام): وهو أشهر أداة أي الزر وهو غني عن التعريف ..قم أيضاُ يتغيير الخاصية Caption لما تريد ..
الأداة Check صندوق اختيار ..
الأداة Option: اختيرا اجباري ..
الأداةCombo : ارسمها وستعرف ما هي .
الأداة ListBox: ارسمها ايضا وستعرف ماهي.
الأداة Timer : اتركها الآن لمستوى متقدم..
الأداةShape: مجرد أشكال..
الأداة Image: لعرض الصور أيضا لكنها تتميز عن الPictureBox بأنها لا تقبل التعديل على الصور و الفلاتر مثلاُ.
الأداة و باقي الأدوات جربها فمن ما عدا أداتي ال Ole و الData لأنها لمستوى متقدم.
حفظ المشروع :
بعد هذا التصميم كله تريد حفظ مشروعك بالحقة vbe ليكون قابل للتعديل الآن من القائمة File خذ الأمر
Save Project As... عندها حدد مكان الحفظ و سيقوم المشروع بسؤالك عن حفظ الفورم Form واحدة واحدة ..ثم يسألك بعدها عن كلمة سر المشروع إذا أحببت أن تحميه ..إذا أردت وافق و اكتب كلمة سر علما أن المشروع لن يفتح بدونها و إن لم ترد ذلك اختر Cancel..
(ملاحظة هامة جدا: قد تغلط و تقوم بالنقر نقر مزدوج على الForm أو أي عنصر آخر عندها ستظهر لك نافذا الكود Code وهي نافذة للكتابة بالكود فقط أغلقها حاليا لن نتعامل معها الآن..)
و إلى هنا يكفي لهذا الدرس..أرجو ان اكون قد وفقت في كتابة الدرس..و أخذنا جولة برمجية ممتعة ..و الآن أريد تقاريركم هل عرفتم تطبقوا الدرس وما الصعوبات التي واجهكم و شكرا..
إخوكم : إيــاس
درس 4 : تطبيقات متقدمة على الكود
السلام عليــكم ورحمة الله ...سنتابع مع الكود نظراُ لأهميته مع تطبيقات اخرى..
درس 4 : تطبيقات متقدمة على الكـــود:
تطبيق1 :
ضع على الفورم Timer وهو العنصر الذي أجلناه ولم نتكلم عنه اتجه إلى نافذة خصائصه ستجد خاصية باسم Interval وهي مسؤولة عن سرعة المؤقت Timer و ستكون قيمتها 0 قد يتغييرها إلى 1000 و أضف Label إلى المشروع ثم اكتب الكود التالي في ال Timer:
كود:
Label1.Caption = Time
ها قد حصلنا على ساعة رقمية ..ما رأيكم..حاولوا تطبيق نفس الفكرة على الText ...
تطبيق 2 :
الفكرة هي كيفية تغييراللون عند وضع الفأرةعلى العنصر
1.في الفورم ضعlabel ولتكن label1 وسمها بالاسم الذي تشاء.
2.اجعل خاصية الlabel وهي الخاصية BACK STYLE تساوي O-TRANSPARENT.
3.ضع الكود التالي في ال LABEL والحدث MouseMove:
كود:
Label1.ForeColor = &H8000000E
4.ضع في الفورم و الحدث MosueMove الكود التالي:
كود:
Label1.ForeColor = &H80000012
5. شغل البرنامج وضع الفارة على ال LABEL وسترى أن لونها قد تغييرإلى الأزرق بمجرد المرور عليها طبق ذلك على ألوان مختلفة..
تطبيق 3:
سنصمم برنامج يتحكم بالنظام قليلا أو يسهل عملية تصفحه:
الكود التالي يقوم بفتح الخيارات الإقليمية:
كود:
Dim ei As Long
ei = Shell("rundll32.exe shell32.dll,Control_RunDLL intl.cpl,,2", vbNormalFocus)
الكود التالي لفتح خيارات المودم :
كود:
Call Shell("rundll32.exe shell32.dll,Control_RunDLL modem.cpl", vbNormalFocus)
الكود التالي لفتح خيارات الانترنت:
كود:
Call Shell("rundll32.exe shell32.dll,Control_RunDLL inetcpl.cpl", vbNormalFocus)
الكود التالي لفتح خصائص جهاز الكمبيوتر :
كود:
Call Shell("rundll32.exe shell32.dll,Control_RunDLL sysdm.cpl", vbNormalFocus)
الكود التالي لفتح إضافة إزالة برامج جديدة :
كود:
Dim ad As Long
ad = Shell("rundll32.exe shell32.dll,Control_RunDLL appwiz.cpl,,1", vbNormalFocus)
إلى هنــا يكفي كتطبيقات و أترككم قليلا لكي تتدربوا على موضوع الكود المهم جدا حتى نكمل دروسنــا مع تحزيم البرامج..وشكرا.
أخوكم : إيــاس
eias@sify.com
الدرس 5 : تحزيم البرنامج:
درس5:جعل البرنامج جاهزا ليعمل خارج الجهاز:
السلام عليكم و رحمة الله ... بعد أنا يتعرف الشخص على الفيجوال ويصمم برنامج عليه و لو كان بسيط يريد ان بجعل برنامجه جاهزا للعمل بعيدا عن بيئة الvb اما عمل البرنامج تنفيذي فهو أمر سهل:
من القائمة( file)ملف خذ الأمر Make Project 1 .exe و طبعا إذا كان برنامجك اسمه eias مثلا ستجد الاسم بدلا من اسم Project1..وقم بتعيين مكان الحفظ اتجد ملف واحد هو الملف التنفيذي أي ال Exe الخاص ببرنامج و بالأيقونة التي عينتها من داخل الفيجوال من الخاصية Icon للفورم..
الآن بعد أن تجد البرنامج مكان ما حددته افتحه ستجد انه يعمل وستجده بالأيقونة التي عينتها ( من خصائص الفورم icon) كما قلنا سابقا..
ولكن كثير ما تحدث المفاجأة عندما ننقل البرنامج إلى جهاز آخر غير جهازنا وهو أن البرنامج لا يعمل و على لأغلب ستكون العبارة بأنه يحتاج ملف dll .....
ماالحل؟؟؟؟
إن البرنامج عندما تعمل له أمر تنفيذي exe يكون غير كامل في الحقيقة و غالبا ما يعتمد على ملفات موجودة في system32 عندك في الجهاز لأن العناصر من Command و TextوLabel و غيرها ليست إلا ملفات بلاحقة Ocx (سنتكلم عنها لاحقاً) يجب أن تنقل مع البرنامج لكي يعمل على جهاز الغير الذي لايحوي فيجوال والآن ما العمل......إنه تحزيم البرنامج..
ما هو تحزيم البرنامج :
هو ضم جميع الملفات التي يحتاجها البرنامج مع الملف التنفيذي exe وخاصة إذا كان البرنامج فيه صور أو ماشابه..
كيف نحزم البرنامج .....نحزم لبرنامج عن طريق برنامج مرفق مع الvb اسمه
Package and deployment wizard
من القائمة ابدأ خذ كافة البرمج في Xp والبرامج في Me ثم خذ
Microsoft Visual Studio 6.0
ثم Microsoft tisual Studio 6.0 Tools
ثم Packge & Deployment Wizard فنكون قد وصلنا له...
(ملاحظة : إن لم تجد هذا المعالج في المكان المذكرو سابقاً لسبب ما فستجده في مجلد الفيجوال نفسه في الموقع التالي
Microsoft Visual Studio\VB98\Wizards\PDWizard
ويكون باسم PDCMDLN افتحه من هناك).
افتح ستجد واجهته بسيطة مكونة من ثلاث صور(لاحظ الصور المرفقة مع الدرس):
الأولى Packgeأي تحزيم و الثانية deploy أي نشر و الثالث نحن لسنا فيه الآن.
خطوات التحزيم:
1. ستجد كبسة browse استعراض اضغطها وحدد له البرنامج غير التنفيذي أي ليس الexe.
2.بعد التحديد اضغط Package عندها قد يظهر لك مريع يسألك ها تردي ترجمة المشروع أو Compile أو تحديدد الملف التنفيذي Browse..
خذ complie وإذا لم يقبل اعمل البرنامج تنفيذي وحدد له الملف التنفيذي.
3. بعدها كل ما سيأتيك اضغط NEXt وكل مايأتيك من مربعات نص اكتب فيه اسم البرنامج خاصتك.
4.بعد النتهاء قد يطلب ملف اسمه macab او ماشابه حدد له الملف في windows\system32 وبعدها سيعطيك تقرير .
5.بعدها نكون قد انتهينا من الحزم وجاء دور النشر...
6.خذ الخيار deploy..
7.بعدها ستمر بنفس الخطوات اضغط فقط next.
8.بعد الانتهاء اذهب للمجلد الذي وضعت فيه البرنامج غير التنفيذي ستجد مجلد اسمه حزم أو Packge افتحه ستجد قد صار لبرنامجك set up عندها يكون البرنامج جاهزا ..
هناك برامج أخرى للتحزيم مثل الSet up factory و wise Installion.هم أقوى من المعالج ولكن عندما تريد أن تحزم البرنامج عليك ان تضع في الحسبان نقل ملفات الDLLو ال OCX مع البرنامج وذلك لأن المعالج يقوم بنقل هذه الملفات إلى مجلد النظام في جهاز المستخدم أما هذه البرامج (مثل الSet up Factory ) فيجب وضع ملفات الdllو الocx مع البرنامج في نفس المجلد ...
فبعد أن تعمل تحزيم للبرنامج ستجد في نفس مجلد الحزم ملف بلاحقة Zip يحوي كل ملفات ال dll و ال ocx التي يجب نقلها مع البرنامج..
على فكرة إذا أردت أن تضع للبرنامج اسم الشركة و اسم المنتج التي تظهر في الخصائص أو اللون الباهت في xp اتبع ما يلي :
عندما تعطي خيار الMake exe ستجد في نافذة تحديد مكان الحفظ خيار Option افتحه وضع فيه ماتشاء من اسم وغيره..
أخوكم : إيــاس