Contenu
Index 🔎︎

# Instruction LSet

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

### Syntaxe :

    LSet Var As String = Text ou LSet Var1 = Var2

### Paramètres :

Var : toute variable de chaîne de caractères contenant la chaîne de caractères à aligner à gauche.

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

Var1 : nom de la variable de type défini par l'utilisateur vers laquelle la copie doit être effectuée.

Var2 : nom de la variable de type défini par l'utilisateur à partir de laquelle la copie doit être effectuée.

Si la chaîne de caractères est plus courte que la variable de chaîne de caractères, l'instruction LSet aligne la chaîne à gauche dans la variable de chaîne de caractères. Toutes les positions restantes dans la variable de chaîne de caractères sont remplacées par des espaces. Si la chaîne de caractères est plus longue que la variable de chaîne de caractères, seuls sont copiés les caractères situés le plus à gauche, et ce, dans la limite du nombre de caractères composant la variable de chaîne. L'instruction LSet vous permet également de copier une variable de type défini par l'utilisateur vers une autre variable du même type.

### Exemple :

    Sub ExampleRLSet
    Dim sVar As String
    Dim sExpr As String
        sVar = String(40,"*")
        sExpr = "SBX"
        ' Aligner "SBX" dans une chaîne de référence de 40 caractères
        ' 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"
        ' Aligner à gauche "SBX" dans une chaîne de référence de 40 caractères
        LSet sVar = sExpr
        Print ">"; sVar; "<"
        sVar = String(5,"*")
        sExpr = "123456789"
        LSet sVar = sExpr
        Print ">"; sVar; "<"
    End Sub

Rubriques connexes

Fonctions de chaîne