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

ما الفرق بين Sub,function,even,proberty

بدأه hamada666 في 28 أكتوبر 2008 · 1 رد · 1,118 مشاهدة · في لغة Ms Visual Basic 6 وما قبلها من إصدارات
مشاركة: واتساب X فيسبوك تيليجرام
#1 صاحب الموضوع

ارجو التوضيح ما الفرق بين ما الفرق بين sub,function,even,proberty ارجو وضع امثله بالفيجول 6

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

#2

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

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

اخي العزيز الفرق بينهما بسيط شيئا ما لانهما جميعا اجراءات Procedures

ولكن الاول Sub

هو اجراء لتنفيذ بعض الاوامر وهي يأتي اما اجراء محلي Local procedure او اجراء قياسي Stander Procedure ويوجد انواع اخري

النوع الاول يمكن اني يأتي داخل الفورم كأجراء خاص بها Privete او اجراء عام معياري داخل كلاس او ميديول Medule وهو القياسي

طيب ايه الفرق بينها وايضا شكله

اولا اجراء ال sub نصرح له عن طريق كلمتي Private يعني خاص وغير معمم

والكلمة الثانية هي Public وهي معممة لجميع المشروع في كلاس او مديول وصورتهما

Private Sub {ProcedureName} ()
End sub

الشكل الثاني

Public Sub [ProcedureName]
End Sub

لقد نسيت ان اذكرك ان هذا الاجراء Sub لا يرجع قيمة اي ينفذ ما بداخله فقط

مثال علي هذا النوع

اذا فرضنا انه يوجد بعض من صناديق النصوص علي الفورم الخاصة بالمشروع بتاعنا

ونريد ان نعمل اجراء صغير لمسح هذه النصوص سريعا بدل ما نكتب الكود مسح كل صندوق نصي علي حدا ماذا نفعل

Private Sub TextClear()
' وليكن ثلاث صناديق نصية من 1 الي ثلاث
textbox1.text=""
textbox2.text=""
textbox3.text=""

end sub

طيب اجراء الفانكشن او الوظائف Function Procedure

وهو ايضا نفس الاجراء السابق الا انه يعيد قيمة return value عند تنفيذه

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

اذا كان لدينا مثلث له طبعا ثلاث اضلاع ونريد ان نأتي قيمة الضلع الثالث

ونحن لدينا قيمة الضلع الاول وهي A وقيمة الضلع الثاني وهي B ماذا تعطينا لغة فيجوال بيسك لذلك

سوف نعمل اجراء من نوع Function

وقبل ذلك نضيف في الفورم ثلاث صناديق نصية Textbox1 , Textbox2 , Textbox3

ونأتي في منطقة التصريح العام وهي General Declaretion

في الفورم

ونكتب الاجراء الاتي

Function Py (A as Double, B as Double) as Double
Py= Sqr(A^2) + (B^2)
end Function

ولكي ننفذها

نأتي الي كود حدث الضغط click في زر الامر

ونكتب الاتي

Private sub Button1_Click()
text3.text = Py(Val(text1.text), Val(text2.text))
end sub

وانا طبعا اعتبر انك ملم بقواعد لغة الفيجوال بيسك وتعرف الوظائف التي ظهرت بهذا الاجراء

ومفهومه اننا نمرر قيمة الفانكشن التي بداخلة عن طريق صناديق النص

اما الخصائص فلنا لها لقاء اخر إن شاء الله

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

العلم بين الحياء والكبرياء

تم تعديل هذه المشاركة بواسطة hisham saad في 31 أكتوبر 2008 في 23:54

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