طلبات الأعضاء للعام الدراسي 2012-2013

[hassanalhawy]

المشاركة الأصلية كتبت بواسطة samermym

السلام عليكم ورحمة الله وبركاتة
برجاء توضيح في الفصل الرابع معني الدالة ( Factorial ) وما معني تعود بقيمة ؟ وما معني return ؟
أتمني أن يشرح لي أحد الأساتذة هذة الأكواد و التدريبات مشكوراً
أخوكم في الله
سمير صبري

الدالة Factorialهو اسم للدالة قد يكون أى اسم آخر معبر عن وظيقتها أو مضمونها قد يكون مثلاً Mdroup . ومضروب العدد 5 مثلاً هو 5*4*3*2*1

  
Public Class Form1
  
  Function Factorial(ByVal Number As Integer) As Integer
  
    Dim i As Integer
  
    Dim res As Integer = 1
  
    For i = 1 To Number
  
        res = res * i
  
    Next
  
    Return res
  
  End Function
  
  Private Sub Button1_Click(ByVal ...
  
    MessageBox.Show(Factorial(8))
  
  End Sub
  
End Class

1 الإعلان عن الدالة Factorialمن النوع العددى Integer وتستقبل قيمة ( معامل أو وسيط ) واحدة هى Number.
2 الإعلان عن معامل ( وسيط ) واحد للدالة Factorialهو Numberمن النوع العددى Integer.
3 الإعلان عن المتغيرi كعداد لعملية التكرار من النوع العددى Integer.
4الإعلان عن المتغير res لتخزين ناتج حساب مضروب العدد من النوع العددى Integer الذى يوافق نوع بيان الدالة Sum ، وهو يمثل القيمة الراجعة ( العائدة ) من الدالة Factorialعند استدعائها.
5 تم إظهار القيمة الراجعة ( العائدة ) من الدالة Factorialفى صندوق رسالة MessageBox بعد استدعاء الدالة ، وذلك بعد استقبال القيمة 8 كـ Argument للدالة Factorial.
6تم استخدام الدالة المعرفة Show( ) المعلنة داخل التصنيف MessageBox والتى من خلالها يمكن إظهار صندوق رسالة MessageBox يتحدد محتوياته حسب الوسائط المعطاه للدالة Show( ).
7 يمكن كتابة الأمر For i = 1 To Number بهذه الطريقة وستؤدى لنفس النتائج For i = Number To 1 step -1 .