IBM Lotus Symphony


Função RTrim [Runtime]

Elimina os espaços no final de uma expressão de cadeia.

Consulte também: Função LTrim

Sintaxe:

RTrim (Text As String)

Valor de retorno:

String

Parâmetros:

Text: Qualquer expressão em caracteres.

Códigos de erro

5 Chamada de procedimento não válido

Exemplo:

Sub ExampleSpaces

Dim sText2 as String,sText as String,sOut as String

sText2 = " <*Las Vegas*> "

sOut = "'"+sText2 +"'"+ Chr(13)

sText = Ltrim(sText2) REM sText = " <*Las Vegas*> "

sOut = sOut + "'"+sText +"'" + Chr(13)

sText = Rtrim(sText2) REM sText = " <*Las Vegas*> "

sOut = sOut +"'"+ sText +"'" + Chr(13)

sText = Trim(sText2) REM sText = " <*Las Vegas*> "

sOut = sOut +"'"+ sText +"'"

MsgBox sOut

end sub


Comentários sobre o produto | Documentação adicional | Marcas comerciais