كتابة إجراء الحدث

كتابة إجراء الحدث :

والواقع أن الخطوة الثالثة هي بناء تطبيق الفيجوال بيسك لأداة موجودة علي نافذة المشروع ، ولكتابة إجراء حدث نستخدم نافذة الشفرة - محرر فيجوال بيسك - فراجع طرق الوصول لنافذة الشفرة - نقر الأداة نقراً مزدوجاً أو نقر أيقونة نافذة الشفرة من نافذة أجزاء البرنامج أو اختيار الخيار Code من قائمة View ، أو لمس المفتاح F7 - وتلك الخطوة تحتاج لمعرفة بلغة البيسك ودراية بالبرمجة - والواقع أنك لم تتعلم بعد الكثير عن فيجوال بيسك ولكنك تعلمت عمليات إيجاد إجراءات الحدث وكتابة شفرة بسيطة .

وكما ذكرنا أنفاً فعند وضع الأداة علي نافذة المشروع يمكنك دمج أي من أحداث تلك الأداة بمشروعك من خلال نافذة الشفرة code window ، فكل أداة لها العديد من الأحداث ، وبالطبع فأنت لا تحتاج لكل أحداث تلك الأداة إنما تحتاج فقط لما يناسب وظيفة مشروعك ، وكما تعلمت سابقاً فصيغة الإجراء هي :

Private Sub ControlName_EventName()سطر عنوان الإجراء

[شفرة الفيجوال بيسك ]

End Sub سطر غلق الإجراء

وكلمة ‘Private Sub’ تعني إجراء خاص ، أو برنامج فرع للأداة عند اقترانها بحدث معين ، والواقع أن شفرة البيسك تعد العمل الابتكاري في المشروع ، وتذكر أن نقص حرف أو علامة تنصيص أو أحد رموز العمليات سوف يسبب أخطاء وبالتالي لن يعمل برنامجك وبالتحديد الجزء الذي يحوي الخطأ ، وهذا النوع من الأخطاء يسمي بالخطأ التركيبي syntax error ، فكتابة البرنامج تتطلب دقة متناهية .

ومن ثم فلكتابة إجراءات الحدث :

· حدد الحدث الذي ترغب في أن يستجيب برنامجك له .

· حدد كيفية الاستجابة للحدث .

· ترجم الاستجابة لشفرة فيجوال بيسك .

· ابحث عن إجراء الحدث في نافذة الشفرة .

· اكتب شفرة البيسك .

و المثال التالي يوضح ذلك :

مثال :

إذا لم تكن فيجوال بيسك تعمل فشغلها ، وابدأ مشروع جديد .

· ضع زر أوامر واحد علي نافذة المشروع .

· اضبط خاصية اسم نافذة المشروع Name للاسم frmFirstCode .

· واضبط عنوان نافذة المشروع من الخاصية علي العنوان "شفرتي الأولي"

· اضبط خاصية زر الأوامر Name -تحدد اسم الشفرة للزر- علي الاسم cmdBeep .

· اضبط خاصية زر الأوامر Caption - تحدد عنوان الزر أو وظيفته - علي الاسم صوت!

حينئذ يصبح شكل نافذة مشروعك كما يلي :

ونحن نرغب في كتابة إجراء حدث واحد يستجيب لحدث نقر Click زر الأوامر command button فنحن نرغب في أن يصدر الكمبيوتر صوت بيب beep من سماعته الداخلية لدي نقر المستخدم علي ذلك الزر .

المس المفتاح F7 لكي تجعل نافذة الشفرة أو محرر فيجوال بيسك مرئي :

وبما يكون شكل نافذة المحرر أكبر من ذلك ففي بيئة فيجوال بيسك يوجد نمط عرض كامل full-module يريك مكان قائمة أحداث الإجراءات واحد بعد الآخر وليس كما تراها هنا

ولكي تحصل علي نمط العرض الكامل انقر القائمة Tools ثم اختر الخيار options كما بالشكل التالي :

تظهر لك النافذة التالية :

واحذف علامة الصح من أمام الخيار Default to Full Module View أن وجدت .

وإذا لم تجد اسم زر الأوامر command button في قائمة الأهداف التي تعلو نافذة الخواص انقر واختر اسم الزر cmdBeep ، ويصبح شكل نافذة الشفرة كما يلي :

ولاحظ إجراء حدث النقر click للزر cmdBeep ، وأنت سوف تحتاج قائمة الإجراءات كثيراً للوصول للإجراء الذي تريد ، مع ملاحظة أن الإجراءات مرتبة ترتيباً هجائياً ، وبين رأس الإجراء ونهايته نكتب شفرة البيسك التي تنفذ وظيفة إصدار الصوت .

ونافذة الشفرة تشبه معالج الكلمات - تسمي أحيانا بمحرر الفيجوال بيسك - ، فيمكنك أن تستخدم خواص معالج الكلمات من تعليم ونسخ ولصق واستبدال ، وسوف تصبح مع التدريب متمرسا علي تلك العمليات ، ضع المؤشر في جسم الإجراء واكتب السطر التالي :

Beep

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

Private Sub CmdBeep_Click()

Beep

End Sub

والآن برنامجك جاهز للتشغيل Run انقر زر البدء8 أو اختر start من قائمة Run أو المس المفتاح F5 لتري ناتج برنامج الأول .

ونقر الزر يخبر الكمبيوتر أن يذهب إلي إجراء الحدث المحدد لحدث النقر cmdBeep_Click ويقوم بتنفيذ شفرته و هي الأمر Beep . وربما رغبت في أن يغير الكمبيوترلون خلفية نافذة المشروع فأضف السطر التالي بعد الأمر Beep :