Search VB 2010

Showing posts with label OOP Lesson 6. Show all posts
Showing posts with label OOP Lesson 6. Show all posts

Sunday, April 17, 2011

OOP VB .Net Toturials and Examples - دروس فى ال أو أو بى

تعرفنا على الخصائص Properties

نقوم بعمل مشروع جديد Project1 - نوعه Windows Application - و الهدف منه انشاء MsgBox - و يتكون من عدد (2) فورم
الاولى باسم (Form1) و الثانيه باسم (Msg) و ايضا Module1
فى الـفورم Form1 نضيف مفتاح
فى الفورم Msg نضيف عدد (2) Button + عدد (1) Label
- جميعنا يعرف الـ MsgBox و هى عبارة عن Form عاديه بها مجموعه من الخصائص و الدوال و الاجراءات المبرمجه و فى هذا المثال سنقوم بعمل MsgBox مصغر يمكننا استخدامه فى جميع المشروعات .
أكواد الموديول :
Public Function Msg1(ByVal Prompt As String)
Msg.Label1.Text = Prompt
Msg.Show()
و فى هذا الكود نقوم بعمل Function اسمها Msg1 مبنيه على متغير اسمه Prompt نوعه String متغير نصى
Prompt سيكون المسؤل عن نقل قيمة الــ Msg1 .
بينما فائدة هذه الداله هو استدعاء الفورم رقم 2 Msg و التى تمثل MsgBox المصغرة و مساواة قيمتها Prompt بقيمة Label1 فى الفورم Msg و بالتالى أى قيمة يأخذها Label1 هى قيمة الــ Prompt و بالتالى قيمة Msg1.
فى الفورم Form1 فى الحدث Button1_Click
Msg("Hello World")
الان قم بتنفيذ المشروع Run و عند الضغط على Button1 فى الـ Form1 لاحظ النتيجه ....
سنقوم الان بزيادة بعض الخصائص و القيم للـ Msg1 المصغرة . كما بالصورة رقم 17
لاحظ : الخصائص جاءت قبل Msg1.ShowDialog و المسؤله عن اظهار الـ Msg1 حيث يجب تنفيذ الاكواد قبل اظهار الرساله.
يمكنك كتابة جميع الاكواد الممكنه فى المنطقة قبل Msg1.ShowDialog
صورة رقم 17

- انتقل الى الحدث Button1_Click و اكتب Msg1 اضغط على مسافه ستجد أن معاملات الداله Msg1 مطلوبه منك قم بالتعويض عنها و نفذ المشروع ...


سنقوم الان باضافة دالة جديده و لكن بنفس الاسم و سنضع بعض الخصائص كما بالصورة رقم 18
صورة رقم 18
و لاحظ : عند التعويض فى الحدث Button1_Click عن قيمة الـ Msg1 ستجد أن المعاملات Parameters المراد التعويض عنها اصبحت نوعين عباره عن معاملات الداله الاولى و معاملات الداله الثانية و هذا يسمى بالـــ OverLoading
و يستخدم الــ OverLoading للتعامل مع الدوال كما فى المثال لاعطائها ديناميكية أكثر للتعامل فيمكنك عن طريق هذه الخاصيه أن تقوم باضافة أحداث و خصائص و إجراءات جديده للدالة Msg1 لا يمكنك تجميعها تحت سقف واحد و لكن عن طريق تقسيمها الى مجموعه من الدوال أو الاجراءات أو الخصاص و جميعها ستصب فى نفس الداله فى النهاية .
و عند التنفيذ يتلاحظ أن المشروع يطلب منك اختيار مجموعه معينه من اجراءات الداله Msg1 لتنفيذها ....
و على سبيل المثال قم باضافة داله ثالثه بنفس الاسم
Public Function Msg1 (ByVal Prompt As Integer)
Msg.Text = Prompt
Msg.ShowDialog()
لاحظ ان عند تنفيذ الكود أصبح مطلوب منك اختيار 3 مجموعات من الاكواد اتنفيذها منها Prompt كمتغير رقمى و هكذا ....

Visual Basic Courses - Share