Sisukord

# LSet lause

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

Sarnased teemad

String functions

Palun toeta meid!