دروس في Microsoft Visual Basic

**العِلو** · 10-28-2006, 20:14

السلام عليكم ورحمة الله وبركاته ..

سيتم إن شاء الله نقل دروس في برنامج Microsoft Visual Basic ، وأتمنى للجميع الإستفادة من هذه الدروس، الشكر الجزيل للأخ عبد الرحيم أحمد في عمل هذه الدروس. وهذه الدروس ستبدأ من المستوى المبتدئ وحتى تصل إلى مرحلة مرضية بإذن الله.

بسم الله الرحمن الرحيم

..... الدرس الأول

* مراحل كتابة البرنامج في Visual Basic:

1. تصميم واجهة البرنامج

حدد كم نافذة تحتاج لبرنامجك وماهي الادوات التي تحتاجها على سبيل المثال:

احتاج الى نافذة واحدة فقط وهي Form1

احتاج الى : label1 خانة عنوان

****1 خانة نص

Comman1 , Command2 زري تحكم(أمر)

نضع هذة الادوات على النافذة (Form1) .

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

حدد اداة ولتكن اداة العنوان Label وذلك بالضغط عليها

ثم اذهب الى قائمة الخصائص properties Windows

غير الخاصية Caption لهذه الأداة إلى "أهلا وسهلا"

والأن قم بتغير الخصائص للأدوات الباقية ،

مربع النص: غير الخاصية **** إلى " " بمعنى اتركها فارغة.

وبالنسبة لزري الأمر
Command 1: غير الخاصية Caption إلى "السلام عليكم"
Command 2: غير الخاصية Caption إلى "خروج"

3. كتابة التعليمات

انقر على على زر السلام عليكم نقراً مزدوجاً ثم تظهر لك نافذة الشيفرة Code Windows

كود:

Private Sub Command1_Click()

End Sub

ثم اكتب الاتي بين السطرين Private و End sub

****1.**** = " السلام عليكم"

انقر على على زر خروج نقراً مزدوجاً ثم اكتب الأتي
End

ليصبح الكود في الشكل النهائي كما يلي

كود:

Private Sub Command1_Click()
   ****1.**** = " &Ccedil;&aacute;&Oacute;&aacute;&Ccedil;&atilde; &Uacute;&aacute;&iacute;&szlig;&atilde;"
End Sub

Private Sub Command2_Click()
   End
End Sub

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

الله يحفظكم

تابع ..

**العِلو** · 10-28-2006, 20:17

..... الدرس الثاني

كائنات فيجوال بيسك:

أعزائي وكما رأينا في الدرس السابق، بأن فيجوال بيسك يعتمد على الكائنات Objects ، فما هي هذه الكائنات؟

في الحقيقة إن كل عنصر في هذا الكون يعتبر كائن فالأرض كائن له خصائصه والسماء كائن له خصائصه أيضا والشجر والأنسان وكل كائن له خصائصه ويتأثر بالأشياء ويؤثر بها.

ومن هنا فإن نماذج وأدوات فيجوال بيسك تعتبر عناصر Objects ، حيث أن كل من هذه العناصر له خصائص Properties وأحداث خاصة به ُEvents وطرق Methods. وكذلك مربع النص **** box والعنوان وز الأمر ....الخ. ولتوضيح ما هي الخصائص والأحداث والطرق دعونا نطلع على المثال التالي:

لنفترض أنا لدينا بالون Ballon فإن هذا البالون له خصائصه ممكن أن يكون أحمر أو أزرق أو أنه منتفخ بالهواء Inflate أو فارغ من الهواءDeflate. كذلك فإن هناك عوامل يتأثر بها البالون كالدبوس أو إبرة الخياطةPuncture وأحداث يستجيب لها.

ولو أردنا برمجة البالون فإننا نقوم بما يلي:
Balloon.Color = Red
وهنا البالون اسم الكائن ، و Color اللون خاصية ، Red أحمر قيمة الخاصية Color ((على افتراض أن البالون لونه أحمر))

Balloon.Inflated = True
ولاحظ هذا الكود فإن البالون هو العنصر و Infalte مملوء بالهواء هي الطريقة Method و True هي القيمة ، حيث يدل هذا الكود بأن البالون منتفخ الهواء.
وبنفس الطريقة Balloon.Inflated = false حيث تدل هذه الجملة بأن البالون غير منتفخ ومن الممكن أن نكتب الكود كما يلي:
Balloon.deflated = True حيث تدل على أن البالون غير منتفخ أيضا.

وأخيرا فإن هناك أدوات أو لنقول ببساطة أشياء ممكن أن يتأثر بها البالون ويستجيب لها ، كالدبوس أو الأبرة Puncture. لاحظ الكود التالي:

كود:

Sub Balloon_Puncture()
  Balloon.Deflate
  Balloon.MakeNoise "Bang"
  Balloon.Inflated = False
End Sub

إن الحدث الذي استجاب له البالون هو كما يلي:
البالون اسم العنصر و الدبوس هو الحدث === الاجراء حيث يبدأ الاجراء ب Sub وينتهي بـ End Sub ،

إلى هنا أنتهينا بإذن الله من مفهوم الـ Objects والـ Properties والـ Methods والـ Event.

تابع ..