IBM Lotus Symphony


Función Trim [Ejecución]

Elimina todas los espacios del principio y del final de una expresión de cadena.

Sintaxis:

Trim( Texto As String )

Valor de retorno:

Cadena

Parámetros:

Texto: Cualquier expresión de cadena.

Códigos de error

5 Inicio del proceso no válido

Ejemplo:

Sub EjemploSpaces

Dim sTexto2 as String,sTexto as String,sOut as String

sTexto2 = " <*Las Vegas*> "

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

sTexto = Ltrim(sTexto2) REM sTexto = " <*Las Vegas*> "

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

sTexto = Rtrim(sTexto2) REM sTexto = " <*Las Vegas*> "

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

sTexto = Trim(sTexto2) REM sTexto = "

sOut = sOut +"'"+ sTexto +"'"

MsgBox sOut

end sub


Comentarios del producto | Documentación adicional | Marcas registradas