تعليم الفيجوال بيسك(الدرس الخامس)

الدرس الخامس
البرنامج الأول

--------------------------------------------------------------------------------

بالطبع سوف نقوم من الآن بعمل بعض البرامج التي تتدرج في صعوبتها. دعنا نبدأ بالبرنامج الأول.

فكرة البرنامج: يقوم هذا البرنامج بإظهار صورة معينة عند الضغط على زر إظهار، و يقوم بإخفاءها عند الضغط على زر إخفاء.

تصميم البرنامج:
Image - صورة
زرين CommandButton1 + CommandButton2
كما في الشكل:



ثم نقوم بعمل التعديلات الضرورية عن طريق تغيير الخصائص:
1. خصائص الForm:
قم بالنقر مرة واحدة على الفورم:
1. BorderStyle : 1-Fixed Single
2. Caption : البرنامج الأول
3. StartUpPosition : 2-CenterScreen


2. خصائص الImage1:
1. Picture : الصورة المراد استخدامها


3. خصائص الCommand1:
1. Caption : إظهار

فيصبح كما في الشكل التالي:




أما الآن نصل إلى المرحلة الختامية، و هي كتابة الكود:
انقر على زر الإظهار مرتين و اكتب الكود التالي:

Private Sub Command1_Click()
Image1.Visible = True
End Sub

ثم انقر على زر الإخفاء مرتين و اكتب الكود التالي:

Private Sub Command2_Click()
Image1.Visible = False
End Sub

قم الآن بتجريب البرنامج عن طريق الضغط على زر F5 أو من قائمة Run اختر Start أو عن طريق الضغط على زر التشغيل في الشريط الموجود في الأعلى، و جرب البرنامج.

و بذلك تكون قد حصلت على برنامج، و لكن هذا البرنامج لا يعمل إلا في بيئة الفيجوال بيسك، فكيف يمكن أن نجعله يعمل دون الحاجة لفيجوال بيسك؟
من قائمة File اختر Make Project1.exe و اضغط زر Ok.

مبروك،، لقد حصلت على برنامج، تابع معنا إلى الدرس السادس لعمل برنامج جديد.