[Taha Okla]

يا هلا :
- أولاًَ : يجب أن تراعي أن الــ(ParamArray) يجب أن يكون في آخر البارامترات لأي إجراء.
- ثانياً : يجب أن يكون عندك إختلاف بنوع البيانات بين البارام الأول و الـ (ParamArray)  إختلافاً جذرياً  :
        يعني مش تحط واحد int والثاني long    لأن في حال الارقام الصغيرة لن يميز المترجم بينهما ..
        بالتالي لن تحصل على نتيجة صحيحة وإن حصلت : فـ بـالصدفة لا أكثر.
- ثالثاً : لا يمكن الجمع بينهما فعلياً، ولكن فيك تكتب الاجراء الأساسي مرتين أو ثلاث مرات (مع اختلاف البارامترات).
وعندما تكتب البارام الاختياري مع البارام المصفوفي ، لا تكتبه كـ إختياري بـ كـ إجباري.  
فتكتب الاجراء : في كل مرة بـ بارامتر مختلف فيقوم المعالج بالتفريق بينهم من حيث نوع البيانات المدخلة.

- مثال عن إجراء فيك تستخدمه بأكثر من حالة :

كود :

   Sub TA(ByVal FldCont As Boolean, ByVal ParamArray Cont() As Integer)
       Dim S As Long = 0
       For Each X In Cont
           S += X
       Next

       MsgBox(FldCont.ToString & " - " & S.ToString)
   End Sub

   Sub TA(ByVal ParamArray Cont() As Integer)
       Dim S As Long = 0
       For Each X In Cont
           S += X
       Next

       MsgBox(S.ToString)
   End Sub

   Sub TA(ByVal FldCont As Boolean)
       MsgBox(FldCont.ToString)
   End Sub

لاحظ : أن للاجراء في الثلاث حالات نفس الاسم ولكن اختلفت نوعية وكمية البارامترات لكل واحد منها.
- وتستطيع مناداته بالكود التالي كمثال :

كود :

   Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
       TA(1, 2, 3)
       TA(False, 1, 2, 3, 4)
       TA(True)
   End Sub

يعني نحن لما كتبنا البارام الاختياري مع البارام المصفوفي : ما كتبناه كـ أختياري بل كـ إجباري..  
ولكن تنوع الاجراءات - جعله يظهر كأحد الاختيارات (كـ إجراء كامل من مجموعة إختيارات وليس مدمج ووحيد)..

اختلفت المدخلات واختلفت المخرجات ..
بحسب ما يتم إدخاله سيعطيك نتيجة تناسبه وغير متداخلة مع غيرها ..