IBM Lotus Symphony


Instrução RSet [Runtime]

Alinha uma cadeia à direita com uma variável de cadeia ou copia um tipo de variável definida pelo utilizador para outro tipo de variável.

Sintaxe:

RSet Text As String = Text or RSet Variable1 = Variable2

Parâmetros:

Text: Qualquer variável de cadeia.

Text: Cadeia que pretende alinhar à direita na variável de cadeia.

Variable1: Variável definida pelo utilizador que é o destino da variável copiada.

Variable2: Variável definida pelo utilizador que pretende copiar para outra variável.

Se a cadeia for mais curta que a variável de cadeia, RSet alinha a cadeia à direita dentro da variável de cadeia. Quaisquer caracteres que restem na variável de cadeia são substituídos por espaços. Se a cadeia for mais longa do que a variável de cadeia, os caracteres que excedam o comprimento da variável são truncados e somente os restantes caracteres são alinhados à direita dentro da variável de cadeia.

É também possível utilizar a instrução RSet para atribuir variáveis de um tipo definido pelo utilizador para outro.

O seguinte exemplo utiliza as instruções RSet e LSet para modificar os alinhamentos à direita e esquerda de uma cadeia.

Exemplo:

Sub ExampleRLSet

Dim sVar as string

Dim sExpr as string

sVar = String(40,"*")

sExpr = "SBX"

REM Alinhar à direita "SBX" numa cadeia de 40 caracteres

REM Substituir asteriscos por espaços

RSet sVar = sExpr

Print ">"; sVar; "<"

sVar = String(5,"*")

sExpr = "123457896"

RSet sVar = sExpr

Print ">"; sVar; "<"

sVar = String(40,"*")

sExpr = "SBX"

REM Alinhar à esquerda "SBX" numa cadeia de 40 caracteres

LSet sVar = sExpr

Print ">"; sVar; "<"

sVar = String(5,"*")

sExpr = "123456789"

LSet sVar = sExpr

Print ">"; sVar; "<"

End Sub


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