إرجاع طويل يحتوي على أكبر عنصر فرعي متوفر للبعد المشار إليه صفيف.
بناء الجملة
UBound ( arrayname [, dimension ] )
يحتوي بناء جملة الدالة UBound على هذه الوسيطات:
الوسيطة |
الوصف |
اسم الصفيف |
مطلوبة. اسم الصفيف متغير ؛ يتبع اصطلاحات تسمية المتغير القياسية. |
بُعد |
اختيارية. متغير (طويل). العدد الكامل الذي يشير إلى الحد الأعلى للبعد الذي يتم إرجاعه. استخدم 1 للبعد الأول، و2 للبعد الثاني، وما إلى ذلك. إذا تم حذف البعد ، فسيتم افتراض 1. |
ملاحظات
يتم استخدام الدالة UBound مع الدالة LBound لتحديد حجم الصفيف. استخدم الدالة LBound للعثور على الحد الأدنى لبعد الصفيف.
ترجع UBound القيم التالية لصفيف بهذه الأبعاد:
Dim A(1 To 100, 0 To 3, -3 To 4)
البيان |
القيمة المرجعة |
UBound(A, 1) |
100 |
UBound(A, 2) |
3 |
UBound(A, 3) |
4 |
مثال
ملاحظة: توضح الأمثلة التالية استخدام هذه الدالة في وحدة Visual Basic for Applications (VBA). لمزيد من المعلومات حول العمل مع VBA، حدد مرجع المطور في القائمة المنسدلة بجوار البحث وأدخل مصطلحا واحدا أو أكثر في مربع البحث.
يستخدم هذا المثال الدالة UBound لتحديد أكبر عنصر فرعي متوفر للبعد المشار إليه لصفيف.
Dim Upper
' Declare array variables. Dim MyArray(1 To 10, 5 To 15, 10 To 20) Dim AnyArray(10) Upper = UBound(MyArray, 1) ' Returns 10. Upper = UBound(MyArray, 3) ' Returns 20. Upper = UBound(AnyArray) ' Returns 10.