Devolve uma Variante (Cadeia) que contém uma cópia de uma cadeia especificada sem espaços à esquerda (LTrim), espaços à direita (RTrim) ou espaços à esquerda e à direita (Trim).
Sintaxe
LTrim(cadeia)
RTrim(cadeia)
Trim(string)
O argumento de cadeia necessárioé qualquer expressão de cadeia válida. Se cadeia contiver Nulo, Nulo é devolvido.
Exemplos de consulta
| Expressão | Resultados |
|---|---|
| SELECT LTrim(ProductDesc) AS Expr1 FROM ProductSales; | Devolve os valores da cadeia de carateres do campo "ProductDesc" sem os espaços à esquerda e é apresentado na coluna Expr1. |
| SELECT RTrim(ProductDesc) AS Expr1 FROM ProductSales; | Devolve os valores da cadeia de carateres do campo "ProductDesc" sem os espaços à direita e é apresentado na coluna Expr1. |
| SELECT LTrim(ProductDesc) AS NoTrailingSpace FROM ProductSales; | Devolve os valores de cadeia de carateres do campo "ProductDesc" sem os espaços à esquerda e aparece na coluna "NoTrailingSpace". |
| SELECT RTrim(ProductDesc) COMO NoLeadingSpace FROM ProductSales; | Devolve os valores de cadeia do campo "ProductDesc" sem os espaços à direita e apresenta na coluna "NoLeadingSpaces". |
| SELECT Trim(ProductDesc) AS trimed FROM ProductSales; | Devolve os valores da cadeia de carateres do campo "ProductDesc" sem os espaços à esquerda e à direita e apresenta na coluna "Compactado". |
Exemplo do VBA
Nota
Os exemplos seguintes demonstram a utilização desta função no módulo VBA (Visual Basic for Applications). Para obter mais informações sobre como trabalhar com o VBA, selecione Referência para Programadores na lista pendente junto a Procurar e introduza um ou mais termos na caixa de pesquisa.
Este exemplo utiliza a função LTrim para remover espaços à esquerda e a função RTrim para remover espaços à direita de uma variável de cadeia. Utiliza a função Compactar para remover os dois tipos de espaços.
Dim MyString, TrimString
MyString = " <-Trim-> " ' Initialize string.
TrimString = LTrim(MyString)
' TrimString = "<-Trim-> ".
TrimString = RTrim(MyString)
' TrimString = " <-Trim->".
TrimString = LTrim(RTrim(MyString))
' TrimString = "<-Trim->".
' Using the Trim function alone
' achieves the same result.
TrimString = Trim(MyString)
' TrimString = "<-Trim->".