IBM Lotus Symphony


Instruction RSet [Exécution]

Aligne à droite une chaîne de caractères dans une variable de chaîne de caractères, ou copie un type de variable défini par l'utilisateur dans un autre.

Syntaxe :

RSet Text As String = Text ou RSet Variable1 = Variable2

Paramètres :

Text : variable de chaîne de caractères.

Text : chaîne de caractères à aligner à droite dans la variable de chaîne de caractères.

Variable1 : variable définie par l'utilisateur et constituant la cible de la variable copiée.

Variable2 : variable définie par l'utilisateur à copier dans une autre variable.

Si la chaîne de caractères est plus courte que la variable de chaîne de caractères, l'instruction RSet aligne la chaîne à droite dans la variable. Tous les caractères restants sont remplacés par des espaces. Si la chaîne de caractères est plus longue que la variable de chaîne de caractères, les caractères en excès sont tronqués, et seuls les caractères restants sont alignés à droite dans la variable.

L'instruction RSet permet également d'affecter des variables d'un type défini par l'utilisateur à un autre.

Dans l'exemple suivant, les instructions RSet et LSet permettent de modifier les alignements à droite et à gauche des caractères d'une chaîne.

Exemple :

Sub ExampleRLSet

Dim sVar as string

Dim sExpr as string

sVar = String(40,"*")

sExpr = "SBX"

REM Aligner à droite "SBX" dans une chaîne de 40 caractères

REM Remplacer les astérisques par des espaces

RSet sVar = sExpr

Print ">"; sVar; "<"

sVar = String(5,"*")

sExpr = "123457896"

RSet sVar = sExpr

Print ">"; sVar; "<"

sVar = String(40,"*")

sExpr = "SBX"

REM Aligner à gauche "SBX" dans une chaîne de 40 caractères

LSet sVar = sExpr

Print ">"; sVar; "<"

sVar = String(5,"*")

sExpr = "123456789"

LSet sVar = sExpr

Print ">"; sVar; "<"

End Sub


Commentaires en retour sur le produit | Documentation complémentaire | Marques