إرجاع "طويل" يحتوي على أكبر منخفض متوفر للبعد المشار إليه للبعد صفيف.
بناء الجملة
UBound ( arrayname [, dimension ] )
في بناء جملة الدالة UBound هذه الوسيطات:
الوسيطة |
الوصف |
arrayname |
مطلوبة. اسم الصفيف متغير; تتبع اصطلاحات تسمية المتغيرات القياسية. |
بُعد |
اختياري. متغير (طويل). يشير العدد بالكامل إلى الحد الأعلى للبعد الذي يتم إرجاعه. استخدم 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.