Função LBound

Aplica-se a
Access para Microsoft 365 Access 2024 Access 2021 Access 2019 Access 2016

Devolve um Valor Longo contendo o menor índice disponível para a dimensão indicada de uma matriz.

Sintaxe

LBound(arrayname [, dimensão ] )

A sintaxe da função LBound tem estes argumentos:

Argumento Descrição
arrayname Obrigatório. Nome da variável de matriz; segue as convenções de nomenclatura de variáveis padrão.
dimensão Opcional. Variante (Longo). Número inteiro que indica qual é o limite inferior da dimensão que é devolvido. Utilize 1 para a primeira dimensão, 2 para a segunda e assim sucessivamente. Se a dimensão for omitida, é assumido 1.

    

Comentários

A função LBound é utilizada com a função UBound para determinar o tamanho de uma matriz. Utilize a função UBound para encontrar o limite superior de uma dimensão de matriz.

LBound devolve os valores na tabela seguinte para uma matriz com as seguintes dimensões:

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

Instrução Valor de retorno
LBound(A, 1) 1
LBound(A, 2) 0
LBound(A, 3) -3

    

O limite inferior predefinido para qualquer dimensão é 0 ou 1, consoante a definição da instrução OptionBase . A base de uma matriz criada com a função Matriz é zero; não é afetada pela Base de Opções.

As matrizes para as quais as dimensões são definidas com a cláusula To numa instrução Dim, Private, Public, ReDim ou Static podem ter qualquer valor inteiro como um limite inferior.

Exemplo

Observação

Exemplos que se seguem demonstram a utilização desta função num módulo Visual Basic for Applications (VBA). Para obter mais informações sobre como trabalhar com o VBA, selecione Referência do Programador na lista pendente junto a Procurar e introduza um ou mais termos na caixa de pesquisa.

Este exemplo utiliza a função LBound para determinar o menor inferior à linha disponível para a dimensão indicada de uma matriz. Utilize a instrução Base de Opções para substituir o valor inferior à linha de matriz base predefinido de 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.