عرض مشاركة واحدة
قديم 20-01-2005, 01:17 AM   #12
البرق سامي
عضو مشارك
 
تاريخ التسجيل: 02-06-2004
الدولة: السعودية
المشاركات: 224
مشاركات الشكر: 0
شكر 169 مرات في 21 مشاركات

الله يسلمك وهذا من طيبك






نريد عمل برنامج يحتوي على زرين فقط [ترحيب - خروج]، وعندما يحدث الضغط Click على الزر الأول يقوم بكتابة (مرحباً) على النموذج،
وعندما نضغط على الزر الثاني يقوم بالخروج من البرنامج، وهذه هي المرحلة الأولى (التخطيط).


ولندخل في المرحلة الثانية مباشرة (التصميم): لذلك قم باختيار الأداة (Command Button)
من نافذة الأدوات التي أشرنا إليها سابقاً،
وقم برسم زرين داخل النموذج، بحيث يبدو الشكل هكذا:



بعد ذلك يلزمنا ضبط الخصائص الخاصة بكل أدوات البرنامج، لذلك قم بالنقر على أي نقطة في النموذج ثم اذهب إلى شاشة الخصائص
لضبط خصائص النموذج،
أولاً: وهي خاصية الـ Caption (عنوان النموذج) وسنغيرها إلى
"تطبيق الدرس الأول" .. شاهد الصورة:









لننتقل الآن إلى الأداة Command1 وهي أداة الزر الأول، ولنقم بتغيير خصائصها كالتالي: الخاصية Caption (عنوان الزر)
غيرها إلى "ترحيب"
- الخاصية Font غيرها إلى خط Tahoma حجمه 14
- الخاصية Hight (الطول) إلى 700 - الخاصية Width إلى 1500.


ثم لنقم بتغيير خصائص الأداة Command2 كالتالي: الخاصية Caption (عنوان الزر) غيرها إلى "خروج"
- الخاصية Font غيرها إلى خط Tahoma حجمه 14
- الخاصية Hight (الطول) إلى 700 - الخاصية Width (العرض) إلى 1500.

هنا تظهر التغيرات السابقة:



وانتبه لابد من تحديد الأداءة قبل تنفيذها.......

وبذلك نكون قد انتهينا من المرحلة الثانية وهي التصميم وبقيت المرحلة الأخيرة وهي: (كتابة الكود).
أولاً لإظهار شاشة الكود نضغط على الزر الأول مرتين (اللي هو "ترحيب")
ستظهر لك الشاشة التالية:



كما ترى يوجد سطران مكتوبان، لا تهتم لهما كثيراً، كل ما يهمنا هو كتابة الكود وسط هذين السطرين، وإليك الكود:
"مرحباً" Print


الآن نفذ نفس الخطوات من جديد بالنسبة للزر الآخر Command2 والخاص بالخروج، وقم بكتابة هذا الكود في داخله:
End

ملحوظه مهمة:
لابد أن نكتب الكود بين السطرين

نضغط دبل كليك على زر ترحيب


Private Sub Command1_Click()
هنا يتم كتابة الكود
End Sub

نكتب بدل "هنا يتم كتابة الكود"
نكتب Print
ثم نضغط مسافه ونحول مؤشر الكتابة إلى العربي ونكتب
"مرحبا"

أو انسخي ما يلي وقومي بلصقه بين السطرين:
Print "مرحبا"

هذا الزر الأول ترحيب

الزر الثاني خروج نضع بين السطرين هالكود .. سهل جداً
end

فيصبح منظر الكود كاملاً هكذا:

Private Sub Command2_Click()
End
End Sub

وبذلك نكون قد أنهينا المرحلة الأخيرة من البرنامج، وأصبح البرنامج جاهزاً للاستخدام، كل ما عليك هو الاسترخاء، والضغط على F5
وسيظهر لك البرنامج كما قمت بعمله، وأنت غير مقيد بما ذكرناه في السابق من ناحية التصميم، فالأمر عائد إلى ذوقك أولاً وأخيراً ...

خلاصة الدرس السابق:
تعرفنا في الدرس السابق على برنامج الفيجول بيسيك بشكل عام، وعلى النوافذ التي يتضمنها، وتعرفنا أيضاً على المراحل التي تتم بها البرمجة،
وهي كما عرفنا ثلاث مراحل [تخطيط - تصميم - كتابة كود]، وقمنا بتطبيق هذه المراحل في عمل برنامج صغير ...
وكان هذا هو أهم ما تطرقنا إليه في الدرس السابق.

** ولحفظ البرنامج:
هناك طريقتان:
الأولى: أن نضغط ملف ثم نختار منه الإيقونه السادسة "حفظ المشروع بإسم" وفائدة هذا الحفظ أن تستطيع تعديل البرنامج لاحقاً
مثل الفوتوشوب يوم تجي تحفظه بصيغة pdf حتى تتمكن من تعديله..

الثانية: هي أن تقوم بحفظه بصيغة exe ... ولكن لا تستطيع تعديله لاحقاً ..
وذلك أن تذهب إلى ملف وتختار الخيار رقم 13

جربوا الطريقتين وأنصحكم أن تحفظوا بالطريقة الأولى ولا مانع من الثانية حتى تستطيعوا إدراجها هنا كتطبيق..


أرجو من الجميع إدراج تطبيقاااتهم ..

أي اقتراح رأي ملاحظه .. عندك وجهة نظر على الشرح أرجو ثم أرجو طرحها


محبكم
البرق سامي
[/QUOTE]
البرق سامي غير متصل  

اعلان