VBA - Función LBound
La función LBound devuelve el subíndice más pequeño de la matriz especificada. Por tanto, LBound de una matriz es CERO.
Sintaxis
LBound(ArrayName[,dimension])
Descripción de parámetros
ArrayName- Un parámetro obligatorio. Este parámetro corresponde al nombre de la matriz.
Dimension- Un parámetro opcional. Esto toma un valor entero que corresponde a la dimensión de la matriz. Si es '1', devuelve el límite inferior de la primera dimensión; si es '2', devuelve el límite inferior de la segunda dimensión y así sucesivamente.
Ejemplo
Agregue un botón y agregue la siguiente función.
Private Sub Constant_demo_Click()
Dim arr(5) as Variant
arr(0) = "1" 'Number as String
arr(1) = "VBScript 'String
arr(2) = 100 'Number
arr(3) = 2.45 'Decimal Number
arr(4) = #10/07/2013# 'Date
arr(5) = #12.45 PM# 'Time
msgbox("The smallest Subscript value of the given array is : " & LBound(arr))
' For MultiDimension Arrays :
Dim arr2(3,2) as Variant
msgbox("The smallest Subscript of the first dimension of arr2 is : " & LBound(arr2,1))
msgbox("The smallest Subscript of the Second dimension of arr2 is : " & LBound(arr2,2))
End Sub
Cuando ejecuta la función anterior, produce la siguiente salida.
The smallest Subscript value of the given array is : 0
The smallest Subscript of the first dimension of arr2 is : 0
The smallest Subscript of the Second dimension of arr2 is : 0