IBM Lotus Symphony


Instrucción RSet [Ejecución]

Alinea a la derecha una cadena dentro de una variable de cadena o copia una variable de tipo definido por el usuario en otra.

Sintaxis:

RSet Texto As String = Texto o RSet Variable1 = Variable2

Parámetros:

Texto: Cualquier variable de cadena.

Texto: cadena que se desea alinear a la derecha de la variable de la cadena.

Variable1: Variable definida por el usuario que es el destino para la copia.

Variable2: Variable definida por el usuario que se desea copiar.

Si la cadena es más corta que la variable de cadena, RSet alinea la cadena a la derecha dentro de la variable de cadena. Los caracteres que queden en la variable de cadena se reemplazan por espacios. Si la cadena es más larga que la variable de cadena, los caracteres que sobrepasan la longitud de ésta se truncan y sólo los restantes se alinean a la derecha dentro de la variable de cadena.

También se puede usar la instrucción RSet para asignar variables de un tipo definido por el usuario a otro.

El ejemplo siguiente usa las instrucciones RSet y LSet para modificar la alineación derecha e izquierda de una cadena.

Ejemplo:

Sub EjemploRLSet

Dim sVar as string

Dim sExpr as string

sVar = String(40,"*")

sExpr = "SBX"

REM Alinea a la derecha "SBX" en una cadena de 40 caracteres

REM Reemplazar asteriscos por espacios

RSet sVar = sExpr

Print ">"; sVar; "<"

sVar = String(5,"*")

sExpr = "123457896"

RSet sVar = sExpr

Print ">"; sVar; "<"

sVar = String(40,"*")

sExpr = "SBX"

REM Alinea a la izquierda "SBX" en una cadena de 40 caracteres

LSet sVar = sExpr

Print ">"; sVar; "<"

sVar = String(5,"*")

sExpr = "123456789"

LSet sVar = sExpr

Print ">"; sVar; "<"

End Sub


Comentarios del producto | Documentación adicional | Marcas registradas