صنع بريمج صغير يظهر رسالة ترحيب عند النقر

لآن سنقوم بحول الله تعالى بمحاولة عمل بريمج بسيط جدا ، ما عمله ؟ هذا ما سنعرفه في هذا الدرس
حسنا سنقوم ببرمجة هذا البريمج ليكتب لنا رسالة مثلا ( رسالة ترحيب ) عند كل نقرة .

هيا افتح برنامج الفجوال بيسك و اتبع التعليمات خطوة خطوة و لا تتعجل ..
اختر النموذج الإفتراضي Standar.exe ثم غير عنوان النموذج ( الفورم ) إلى :

بريمج الترحيب كما تعلمت آنفا إذا كنت قد نسيت استعذ بالله من الشيطان الرجيم و انقر هنا لتراجع درس تسمية الفورم .
بعد أن سميت الفورم بـ بريمج الترحيب غير خصائص الفورم كالتالي :
انقر فوق النموذج نقرة واحدة ثم اتّجة لنافذة الخصائص و غير خاصية خط الفورم Font إلى البنط الذي يحلو لك , أنا شخصيا اخترت البنط ( تاهومه TAHOMA) . عند اختيار خاصية الفونت في نافذة الخصائص يظهر تلقائيا سهم منسدل انقره فتظهر لك أنواع الفونتات المجودة في جهازك و من ثم اختر واحد منها وكما ذكرت انا اخترت الفونت الذي تراه حاليا .

إذا اردت أن تظيف أيقونة لبريمجك هذا ....اذهب الى نافذة الخصائص واختر كلمة Icon ....

فيظهر سهم منسدل انقره فتفتح نافذة تسألك عن تحديد مكان الأيقونة التي تريدها

( ان كنت لا تعرف اين الأيقونة ابحث في جهازك بواسطة الباحث اكتب في الباحث الكلمة التالية :

(ico . * ) ثم انقر لبدأ البحث ... إن لم يتوفر في جهازك أيقونات و هذا مستحيل .... على كل حال يمكنك ترك الأيقونة الإفتراضية .

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

انقر فوق النموذج مرتين تظهر لك نافذة الشفرة ستلاحظ وجود سطرين والذين ذكرناهما في الدرس السابق .

اذهب إلى مربع قائمة الأحداث انقر السهم المنسدل و اختر في تلك القائمة الحدث Click ثم اكتب بين الجملتين البرمجيتين التاليتين :

Private Sub Form_Click()

End Sub
 

الجملة التالية :

print " السلام عليكم و رحمة الله تعالى و بركاته "

فينتج لنا الجمل التالية :

Private Sub Form_Load()

print " السلام عليكم و رحمة الله تعالى و بركاته "

End Sub

الآن شغل بريمجك الذي عملته بيديك .

كيف تشغل البريمج ... اذهب لشريط الأدوات و انقر الشكل التالي

سيتم تشغيل بريمجك عندها جربه كيف يعمل انقر فوق بريمجك الذي صنعت فتظهر لك الرسالة التي كتبتها بين الشفرة كما تلاحظ أن العنوان و الرسالة الترحيبية منسقة من اليمين إلى اليسار لأنك أخترت خاصية Right بالقيمة true .

... نعم أنت الذي صنعت البريمج لست أنا ألم تصدق ... لما تنظر هكذا ....
أسرع و نادي من حولك كي يروا و يجربوا رسالة الترحيب التي صنعتها لهم ..