تخطي إلى المحتوى الرئيسي
الدعم
تسجيل الدخول باستخدام حساب Microsoft
تسجيل الدخول أو إنشاء حساب.
مرحباً،
تحديد استخدام حساب مختلف!
لديك حسابات متعددة
اختر الحساب الذي تريد تسجيل الدخول باستخدامه.

إرجاع طويل يحتوي على أصغر أحرف فرعية متاحة للبعد المشار إليه صفيف.

بناء الجملة

LBound ( arrayname [, dimension ] )

يحتوي بناء جملة الدالة LBound على هذه الوسيطات:

الوسيطة

الوصف

اسم الصفيف

مطلوبة. اسم الصفيف متغير ؛ يتبع اصطلاحات تسمية المتغير القياسية.

بُعد

اختيارية. متغير (طويل). العدد الكامل الذي يشير إلى الحد الأدنى للبعد الذي يتم إرجاعه. استخدم 1 للبعد الأول، و2 للبعد الثاني، وما إلى ذلك. إذا تم حذف البعد ، فسيتم افتراض 1.


ملاحظات

يتم استخدام الدالة LBound مع الدالة UBound لتحديد حجم الصفيف. استخدم الدالة UBound للعثور على الحد الأعلى لبعد الصفيف.

ترجع LBound القيم الموجودة في الجدول التالي لصفيف بالأبعاد التالية:

Dim A(1 To 100, 0 To 3, -3 To 4)

البيان

القيمة المرجعة

LBound(A, 1)

1

LBound(A, 2)

0

LBound(A, 3)

-3


الحد الأدنى الافتراضي لأي بعد هو إما 0 أو 1، اعتمادا على إعداد عبارة OptionBase . قاعدة الصفيف التي تم إنشاؤها باستخدام الدالة Array هي صفر؛ لا تتأثر ب Option Base.

يمكن أن تحتوي الصفائف التي يتم تعيين الأبعاد لها باستخدام عبارة To في عبارة Dim أو Private أو Public أو ReDim أو Static على أي قيمة عدد صحيح كحد أقل.

مثال

ملاحظة: توضح الأمثلة التالية استخدام هذه الدالة في وحدة Visual Basic for Applications (VBA). لمزيد من المعلومات حول العمل مع VBA، حدد مرجع المطور في القائمة المنسدلة بجوار البحث وأدخل مصطلحا واحدا أو أكثر في مربع البحث.

يستخدم هذا المثال الدالة LBound لتحديد أصغر واصف فرعي متاح للبعد المشار إليه لصفيف. استخدم عبارة Option Base لتجاوز قيمة الصفيف الفرعية الأساسية الافتراضية البالغة 0.

Dim Lower
' Declare array variables.
Dim MyArray(1 To 10, 5 To 15, 10 To 20)
Dim AnyArray(10)
Lower = Lbound(MyArray, 1) ' Returns 1.
Lower = Lbound(MyArray, 3) ' Returns 10.
Lower = Lbound(AnyArray)
' Returns 0 or 1, depending on setting of Option Base.

هل تحتاج إلى مزيد من المساعدة؟

الخروج من الخيارات إضافية؟

استكشف مزايا الاشتراك، واستعرض الدورات التدريبية، وتعرف على كيفية تأمين جهازك، والمزيد.

تساعدك المجتمعات على طرح الأسئلة والإجابة عليها، وتقديم الملاحظات، وسماعها من الخبراء ذوي الاطلاع الواسع.

هل كانت المعلومات مفيدة؟

ما مدى رضاك عن جودة اللغة؟
ما الذي أثّر في تجربتك؟
بالضغط على "إرسال"، سيتم استخدام ملاحظاتك لتحسين منتجات Microsoft وخدماتها. سيتمكن مسؤول تكنولوجيا المعلومات لديك من جمع هذه البيانات. بيان الخصوصية.

نشكرك على ملاحظاتك!

×