Module
Contents
Index 🔎︎

# 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

## Paremetre:

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.

## Príklad:

    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