Deze functie retourneert een waarde van het gegevenstype Lang die het kleinst beschikbare subscript aangeeft voor de opgegeven dimensie van een matrix.
Syntaxis
LBound ( matrixnaam [, dimensie ] )
De syntaxis van de functie LBound heeft deze argumenten:
|
Argument |
Beschrijving |
|
matrixnaam |
Vereist. De naam van de matrixvariabele; volgt de standaardnaamgevingsregels voor variabelen. |
|
dimensie |
Optioneel. Variant (Lang). Een geheel getal dat aangeeft voor welke dimensie de ondergrens wordt geretourneerd. Gebruik 1 voor de eerste dimensie, 2 voor de tweede, enzovoort. Als u dimensie weglaat, wordt 1 gebruikt. |
Opmerkingen
De functie LBound wordt gebruikt met de functie UBound om de grootte van een matrix te bepalen. Gebruik de functie UBound om de bovengrens van een matrixdimensie te vinden.
LBound retourneert de waarden in de volgende tabel voor een matrix met de volgende dimensies:
Dim A(1 To 100, 0 To 3, -3 To 4)
|
Instructie |
Retourwaarde |
|
LBound(A, 1) |
1 |
|
LBound(A, 2) |
0 |
|
LBound(A, 3) |
-3 |
De standaardondergrens voor elke dimensie is 0 of 1, afhankelijk van de instelling van de instructie OptionBase . De basis van een matrix die is gemaakt met de functie Matrix is nul; dit wordt niet beïnvloed door Option Base.
Matrices waarvoor dimensies worden ingesteld met de component To in een instructie Dim, Private, Public, ReDim of Static kunnen elk geheel getal als ondergrens hebben.
Voorbeeld
Opmerking: In de volgende voorbeelden wordt het gebruik van deze functie in een VBA-module (Visual Basic for Applications) toegelicht. Meer informatie over het werken met VBA vindt u door in de vervolgkeuzelijst naast Zoeken de optie Referentie voor ontwikkelaars te selecteren en een of meer termen in het zoekvenster te typen.
In dit voorbeeld wordt de functie LBound gebruikt om het kleinst beschikbare subscript te bepalen voor de opgegeven dimensie van een matrix. Gebruik de instructie Option Base om de standaardwaarde van 0 voor het subscript van het grondtal van de matrix te vervangen.
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.
