|
اجعل جهازك يعمل شيئا من أجلك. |
|
|
|
|
Written by ِCrazy-Man
|
|
انأحد, 14 أêار 2006 |
|
بسم الله الرحمن الرحيم
مقدمة :
في هذا الدرس سنتعلم بإذن الله خطوة خطو كيفية انشاء Method ، و التي هي عبارة عن قطعة كود يتم تشغيلها انطلاقا من مقاطع أخرى، و سنرى بعد ذلك كيف يمكننا إنشاء Parameters لل Methods.
هي ال ما Method ؟
Method هي عبارة عن قطعة كود تقوم باعطاء الأمر لبرنامجك لعمل شئ معين. في الفيجوال بيسك و في أي لغة برمجة هناك بعض ال Methods التي تكون جاهزة و ماعليك سوى مناداتها لعمل أمر ما فمثلا MsgBox يقوم بأخذ بعض البرامترز و يقوم باظهار رسالة على شاشة المستعمل. طبعا ليست كل الأشياء التي تؤيدها جاهزة مسبقا في بيئة التطوير لذا ستجد نفسك مظطرا لكتابة Methods لإكمال العمل الذي تريده. ال Method تحتوي اذا على كود يقوم بعمل معين فمثلا قد تنشأ Method وتسميها PlaySound و يكون الكود فيها يقوم بتشغيل ملف صوتي و بمجرد مناداتها باسمها تقوم بتنفيذ الكود و تشغيل الملف الصوتي، و هذا طبعا يقيك من التكرار فبدل كتابة الكود كل مرة تحتاجه تكتبه مرة واحد و بعدها تناديه وقتما شئت. و الMethod تشتغل فقط بكتابة اسمها، فيتم القفز الى ال Method و تنفيذ الكود و بعد ذلك الخروج منها و العودة الى ال Method التي نادتها و تنفيذ السطر التالي و هكذا ... و طبعا يمكنك مناداة مجموعة من ال Methods
واحدة تلو الأخرى : PlaySound ShowLyrics
أنواع ال Methods (Subs,Functions)
هناك نواعان من ال Functions : Methods و Subroutines(subs). ال Functions تختلف عن ال Subs كونها تعيد قيمة بعد تنفيذ الكود أما ال Subs فدورها يكون فقط بتنفيذ الكود الذي داخلها، و طبعا هذا فارق كبير فمثلا لو كنت تريد أن تنشأ Method اسمها مثلا ToDay ترجع لنا String يحتوي على اسم اليوم، في هذه الحالة لن يمكننا التعامل مع ال subs لكن يجب انشاء Function من أجل عمل ذلك و يكون الناتج كالتالي : Dim Tday as String Tday=ToDay و بهذا يتم حفظ اليوم الراجع من الفنكشن ToDay في المتغير Tday لاستعمال لاحق.
كتابة ال Methods
من أجل كتابة Sub مثلا يجب استعمال الكلمة المفتاحية Sub و يكون الإعلان كالتالي : Sub MySub() End Sub الكلمة المفتاحية Sub تقوم بتحديد نوع ال Method يعني أنه Sub و لن يقوم بارجاع أية قيمة، بعد ذلك يأتي اسم ال Sub و القوسين الفارغين يعنيان أن هذه ال Sub لا تملك بارامترز، و أخيرا End Sub تعني ان هنا نهاية ال Subroutine . و كل الكود التي سيتم تنفيذه عند مناداة هذه ال sub سيكون بين هذين السطرين. ماهي ال Function تعريف ال Function مشابه للتعريف السابق الا أنه يزيد عليه بتحديد نوع القيمة التي سيتم ارجاها من طرف ال Function و التعريف يكون كالتالي : Function MyFirstFunction() As Integer End Function طبعا كما تلاحظ فالجزء الزائد هو " As Integer" و هو يحدد نوع ال data المرجعة من طرف ال Function . و يتم ارجاع القيمة عن طريق الكلمة المفتاحيةReturn كما في المثال أسفله : Function ReturnNumberOne() As Integer Return 1 End Function هذه ال Function ترجع الرقم 1 .
البرامترز في ال Functions & Subroutines
في بعض الأحيان قد تحتاج الى اعطاء ال Method معلومات اضافية حتى تتمكن من تنفيذ الكود بشكل مناسب، فلنفرض مثلا أنك تريد انشاء Function اسمها Add و تقوم باستقبال رقيمين من المستعمل و ترجع له ناتجهما، في هذه الحالة لا غنى لك عن استعمال البرامترز و يمكنك انشاء ال Function بالشكل التالي Function Add(ByVal X As Integer,ByVal Y As Integer) As Integer
Return X+Y
End Function
كما تلاحظ في المثال فال Function قامت بأخذ متغيرين اثنين X & Y و بعد ذلك قامت بارجاع ناتجهما و يمكن استعمال هذه الفنكشن كالتالي :
Dim Result As Integer Result = Add(15,15)
و هكذا تكون قيمة المتغير result تساوي 30.
 Add as favourites (21) |  Quote this article on your site | Views: 2337 | E-mail
Only registered users can write comments.
Please login or register. Powered by AkoComment Tweaked Special Edition v.1.4.6
AkoComment © Copyright 2004 by Arthur Konze - www.mamboportal.com
All right reserved |
|
Last Updated ( انأحد, 14 أêار 2006 )
|
