[ahmedfa71]

عند إضافة هذا الكود أو الدالة 

PHP كود :

Function GetTSDB(ByVal EC As Integer) As Double
        If (EC < 1 Or EC > 17) Then Return 0
        Dim ASDB(,) As Integer = { _
          {30, 25, 33, 60, 29, 63, 69, 71, 86, 101, 117, 150, 180, 207, 255, 300, 390}}
        Dim TASDB As Double = (ASDB((EC - 1)) * 55)
        Return TASDB
    End Function 


تظهر رسالة خطأ
number of indices is less than the number of dimensions of the indexed array
فأرجو من الإخوة مساعدتي في تصحيح الخطأ
مع العلم أن EC هي عبارة عن قيمة الكومبوبوكس
وجزاكم الله خيرا

[عبـدالله]

احذف الفاصلة في تعريف ASDB

[ahmedfa71]

(20-04-17, 07:09 AM)عبـدالله كتب : احذف الفاصلة في تعريف ASDB

شكرا لك أخي عبد الله وجزاك الله خيرا على المساعدة
فعلا إشتغل الكود بعد حذف الفاصلة في تعريف ASDB
شكرا جزيلا وجعلها الله في ميزان حسناتك

[IBRA939]

مشاءالله ماقصرت