Module
Contents
Index 🔎︎

# LSet Statement

Joondab stringi stringimuutujast vasakule või kopeerib kasutaja määratletud tüübiga muutuja kasutaja määratletud erineva tüübiga muusse muutujasse.

## Süntaks:

    LSet Var As String = Text või LSet Var1 = Var2

## Parameetrid:

Var: vasakule joondatavat stringi sisaldav suvaline stringmuutuja.

Text: stringmuutujast vasakule joondatav string.

Var1: selle kasutaja määratletud tüübiga muutuja nimi, kuhu soovid kopeerida.

Var2: selle kasutaja määratletud tüübiga muutuja nimi, millest soovid kopeerida.

Kui string on lühem kui stringmuutuja, siis joondab lause LSet stringi stringmuutujas vasakule. Kõik ülejäänud stringmuutuja positsioonid asendatakse tühikutega. Kui string on pikem kui stringmuutuja, siis kopeeritakse ainult kõige vasakpoolsemad märgid kuni stringmuutuja lõpuni. Lause LSet abil saab kasutaja määratletud tüübiga muutuja kopeerida ka muusse sama tüüpi muutujasse.

## Näide:

    Sub ExampleRLSet

    Dim sVar As String

    Dim sExpr As String

        sVar = String(40,"*")

        sExpr = "SBX"

        REM Joonda SBX 40-märgilises viitestringis

        REM Asenda tärnid tühikutega

        RSet sVar = sExpr

        Print ">"; sVar; "<"

        sVar = String(5,"*")

        sExpr = "123457896"

        RSet sVar = sExpr

        Print ">"; sVar; "<"

        sVar = String(40,"*")

        sExpr = "SBX"

        REM Vasakjoonda SBX 40-märgilises viitestringis

        LSet sVar = sExpr

        Print ">"; sVar; "<"

        sVar = String(5,"*")

        sExpr = "123456789"

        LSet sVar = sExpr

        Print ">"; sVar; "<"

    End Sub