الفريق العربي للبرمجةأرشيف المنتديات · 2000 – 2023
نسخة أرشيفية للقراءة فقط — التسجيل والمشاركة مغلقان، والمحتوى محفوظ كما كان.

Inheritance in VB.NET

مغلق
بدأه hazzoom في 25 أغسطس 2005 · 16 رد · 4,746 مشاهدة · في Microsoft Visual Basic.NET
مشاركة: واتساب X فيسبوك تيليجرام
#1 صاحب الموضوع

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

في الدرس السابق : ال Classes في VB.NET

قمت بشرح ماهية الـ Class وكيفية انشاءها وكيفية التعامل معها وعلي الرغم من اني أردت التطرق الي الـ Properties أولا الا أن الأقدار شاءت أن أقدم درس بسيط وصغير عن الـ Inheritance أولا مع وعد بتقديم درس عن الـ Properties لاحقا ان شاء الله تعالي ,,,

ما هي الوراثه ؟؟؟

بالمعني العادي المألوف , ففي المعتاد أن يقال أن الشخص الفلاني ورث من والده عدة (((خواص))) مثل اللون والطول و .......و(((أفعال))) مثل حب البرمجة بالفيجوال بيسك دوت نت و.......,,,

معني ذلك أنه له نفس الخواص Properties وكذلك الأفعال Methods السابقه و ذلك بغض النظر أن هذاالشخص لديه خواص وأفعال أخري اضافيه غير موجوده في الأب ,,,

ولاختصار الموضوع لو أنك تقوم بعمل برنامج يتطلب عمل فصيلتين 2 Classes وأنشات الـ Class الأولي بالفعل وأردت انشاء Class أخري تحوي نفس Properties و Methods الخاصه بالـ Class الأولي هل ستقوم بانشاء نفس ال Properties و Methods التي قمت بانشاءها في الClass الأولي داخل الClass الثانيه مره أخري ؟؟؟ لا طبعا ,,,

ففي هذه الحاله نستخدم مبدأ الوراثه Inheritance وطبعا تسمي ال Class الأولي بال Parent أو Super أو Base والـ Class الثانيه تسمي بالـ Child أو Sub أو Drived كيف ذلك ؟؟؟

بعد انشاء Parent Class التي تحتوي علي داله جمع قيمتين نجد أن الكود بها كالتالي :

Public Class Parent
    Public Function sum(ByVal x As Integer, ByVal y As Integer)
        Return (x + y)
    End Function
End Class

و Child Class التي بها داله الفرق بي قيمتين ونريد اضافه داله الجمع الموجوده في الParent Class اليها دون كتابتها مره أخري فيكون الكود بها كالتالي :

Public Class Child
    Inherits Parent
    Public Function diff(ByVal x As Integer, ByVal y As Integer)
        Return (x - y)
    End Function
End Class

وطبعا نستنتج أن صيغة الـ Inheritance القياسيه تكون كالتالي :

Inherits < Parent Class Name >

ثم في الفورم الرئيسيه في حدث Button1 Click :

1- ننشئ وجود للـ Child Class التي تحتوي علي دالتين الجمع والطرح وذلك بعد وراثه الـ Parent Class ,

Dim adif As New Child

2- ولعرض ناتج الداله في رساله ,

MsgBox(adif.sum(Val(TextBox1.Text), Val(TextBox2.Text)))

من السابق وجدنا أنه أنشأنا وجود للـ Child Class ولكن استخدمنا عن طريقه داله موجوده في الـ Parent Class .

أما بفرض أنك أنشأت Class ولا تريد الوراثه منها لسبب ما مثل أنك لا تريد أن تتداخل دوال كل Class مع الأخري ((مثلا)) يكون الاعلان عن الـ Parent Class كالتالي :

Public NotInheritable Class < Class Name >

جرب وأضف كلمة NotInheritable الي الاعلان عن الـ Parent Class ثم أنظر الي كود حدث Button1 Click ....ماذا وجدت ؟؟؟

تجد أنه لم يتم التعرف علي الداله sum ...........,,,

لأنه بهذا الداله sum ليست تابعه للـ Child Class ,,,

هذه هي مبادئ الوراثه ,,,

أرجو أن أكون قد أفدتكم ,كماأرجو أن أكون قد وفقت في توصيل معني الوراثه وكيفيه الاستفاده منها وان كان عندي خطأ فياريت توضحوه ,,,

كما أرجو ممن له تعليق ألا يتردد في كتابته ,,, وفقنا ووفقكم الله لما فيه الخير ,,,

Class Inheritance.rar

تم تعديل هذه المشاركة بواسطة hazzoom في 25 أغسطس 2005 في 22:10

#2

شكراً لك وننتظر المزيد

رفيق لا خسرته خسرت العمر كله ورفيق لا خسرته سلمت من الخساره

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

افضل محاضراته بالنسبه لي هي الأقصى والخونة

#3

طيب قولولي لو الدرس مش حلو أو أنا معرفتش أوصل المعلومه أو ما يخطر ببالكم !!! :(

#4

:rolleyes: :) :rolleyes:

جزيل الشكر والي الامام

#6

الله ينور عليك

ولكن بالنسبة لواحد مثلي مايعرفش حاجة في oop ينفع يعتمد علي الدروس دي فقط

لاني جربت وقرأت الفصل الاول من كتاب MS Press - OOP with Microsoft VB.NET and C# Step By Step.pdf ولم افهم جيدا واحسست انني تائه

ولو كان هناك كتاب اكثر تفصيلا او اقل تعقيدا قولوا لي عليه وان كان هو افضلهم وبعد ما استوعب الدروس دي استطيع ان استزيد من هذا الكتاب او غيره قولولي

وجزاكم الله خيرا

لا اله الا الله عليها نحيا وعليها نموت وفي سبيلها نجاهد

#7
اقتباس
ولكن بالنسبة لواحد مثلي مايعرفش حاجة في oop ينفع يعتمد علي الدروس دي فقط

لا , لأنها لن تغطي كل نقاط الـ OOP ,,,

اقتباس
لاني جربت وقرأت الفصل الاول من كتاب MS Press - OOP with Microsoft VB.NET and C# Step By Step.pdf ولم افهم جيدا واحسست انني تائه

ولو كان هناك كتاب اكثر تفصيلا او اقل تعقيدا قولوا لي عليه وان كان هو افضلهم وبعد ما استوعب الدروس دي استطيع ان استزيد من هذا الكتاب او غيره قولولي

يمكن في أول مره تقرأ عن الـOOP مش هتفهم بنسبة 100% , لكن ممكن بنسبة 40% ثم أقرأه مره أخري تأكد هتلاقي النسبة زادت مثلا الي 60% وهكذا الي 100% ان شاء الله ,

لكن بجد الكتاب ممتاز وأنا أيضا أقرأه فلا تمل ,وغالبا هذا الكتاب هو المتاح حاليا وأعتقد أنه الأفضل ,,

تم تعديل هذه المشاركة بواسطة hazzoom في 27 أغسطس 2005 في 06:39

#8

جزاك الله خيرا يا hazoom

واعتقد انني بدأت أكون فكرة معقولة عن الكلاس وماهيتها واعتقد ان بعد دروسك اقدر اعيد القراءة مرة اخري لعل الله يعينني فأفهم

لا اله الا الله عليها نحيا وعليها نموت وفي سبيلها نجاهد

#11

السلام عليكم

استاذ حزوم

شكرا لدروسك رائعه

سؤالي يقول

لو ان لدي ابن يرث سترنق من الاب

والابن بس ياخذ هذا سترنق من الاب

لاني ما اعرف كيف ياخذ (يستقبل ) الابن سترنق وكيف ممكن استخدمه

في الكويري حقته

#13

طيب

الفورم 1 ... يحوي بوكس وداتا قريد ...الخ

ويحوي ايضا كبسه (زر)

في الفورم 1 يتم ادخال رقم طالب نوعه (سترنق )...

وعند ادخال الرقم تظهر البيانات في هذا الفورم

وعندما اضغط على كبسه تظهر وندوز بها معلومات ايضافيه لطالب

يعني بيانات تختلف من طالب لاخر

وعشان تظهر بيانات طالب لابد ان ادخل رقمه ... وبما انني قد ادخلته في الفورم 1 اريد ارساله للفورم 2

علما بان رقم الطالب .. (سترنق )

ان شاء الله الصورة وضحت ...

:)

#14

طيب وما علاقة الوراثة فى هذا الموضوع :blink:

الموضوع مكرر فى المنتدى ابحث عنه

VB.NET and C# Comparison

http://www.harding.edu/fmccown/vbnet_csharp_comparison.html

002.gif

=-=-=-=-=-=-=
ذو العلم يشقى فى النعيم بعلمه .:. واخو الجهالة فى الشقاوة ينعم
=-=-=-=-=-=-=
يا من بدنياه اشتغل . قد غره طول الأمل . فالموت يأتى بغتة . والقبر صندوق العمل
=-=-=-=-=-=-=
ان لم تستطع ان تجد ما تفعله فافعل ما لم تسطع ان تجده

screen_shot_2011-05-19_at_12.44.49_pm.pn

#15

اجل يا سولو انت تتعبني :blink:

طيب انا داري مكرر

بس ما عرفت ادور كل اللي لقيت هذا الموضوع ومواضيع اخرى

لكن لم اجد الاجابه ولقيت ان موضوع هو اقرب شيء

طيب طلب :

ممكن تعطيني مفتاح البحث عن موضوع كهذا ....

اما اخيرا :

احب ابشرك بنفس الوقت اني لقيت الحل لكن ليس هنا

#16
اقتباس
اجل يا سولو انت تتعبني 

جزاك الله خيرا كيف اتعبتك :(

والحمدلله انك وجدت الحل

VB.NET and C# Comparison

http://www.harding.edu/fmccown/vbnet_csharp_comparison.html

002.gif

=-=-=-=-=-=-=
ذو العلم يشقى فى النعيم بعلمه .:. واخو الجهالة فى الشقاوة ينعم
=-=-=-=-=-=-=
يا من بدنياه اشتغل . قد غره طول الأمل . فالموت يأتى بغتة . والقبر صندوق العمل
=-=-=-=-=-=-=
ان لم تستطع ان تجد ما تفعله فافعل ما لم تسطع ان تجده

screen_shot_2011-05-19_at_12.44.49_pm.pn

#17

اقصد تتبعني :unsure:

هذا الموضوع مغلق.

مواضيع مشابهة