Contents

# LSet Statement

Zarovná reťazec vľavo v reťazcovej premennej alebo skopíruje premennú používateľom určeného typu do inej premennej iného používateľom určeného typu.

### Syntax:

    LSet Premenná As String = Text alebo LSet Premenná1 = Premenná2

### Parameters:

Premenná: Premenná typu String obsahujúca reťazec, ktorý chcete zarovnať vľavo.

Text: Reťazec, ktorý chcete zarovnať vľavo od premennej typu string.

Premenná1: Názov premennej používateľom definovaného typu, do ktorej chcete kopírovať.

Premenna2: Názov premennej používateľom definovaného typu, z ktorej chcete kopírovať.

Ak je reťazec kratší ako reťazcová premenná, LSet zarovná reťazec vľavo v reťazcovej premennej. Zostávajúce miesta v reťazci budú nahradené medzerami. Ak je reťazec dlhší ako reťazcová premenná, budú skopírované len znaky najviac naľavo až do dĺžky reťazcovej premennej. Príkazom LSet je tiež možné kopírovať premennú používateľom definovaného typu do inej premennej rovnakého typu.

### Example:

    Sub ExampleRLSet
    Dim sVar As String
    Dim sExpr As String
        sVar = String(40,"*")
        sExpr = "SBX"
        REM Zarovná "SBX" v 40-znakovom reťazci
        REM nahradí hviezdičky medzerami
        RSet sVar = sExpr
        Print ">"; sVar; "<"
        sVar = String(5,"*")
        sExpr = "123457896"
        RSet sVar = sExpr
        Print ">"; sVar; "<"
        sVar = String(40,"*")
        sExpr = "SBX"
        REM Zarovná vľavo "SBX" v 40-znakovom reťazci
        LSet sVar = sExpr
        Print ">"; sVar; "<"
        sVar = String(5,"*")
        sExpr = "123456789"
        LSet sVar = sExpr
        Print ">"; sVar; "<"
    End Sub

Related Topics

String functions

Please support us!