Module
Contents
Index 🔎︎

# LSet Statement

Wyrównuje ciąg w zmiennej do lewej strony lub kopiuje zmienną typu zdefiniowanego przez użytkownika do innej zmiennej typu zdefiniowanego przez użytkownika.

## Składnia:

    LSet zmienna As String = tekst lub LSet zmienna1 = zmienna2

## Parametry:

Zmienna: Dowolna zmienna zawierająca ciąg, który należy wyrównać do lewej strony.

Tekst: Ciąg, który ma zostać wyrównany do lewej strony zmiennej.

Zmienna1: Nazwa zmiennej typu zdefiniowanego przez użytkownika, do której należy skopiować dane.

Zmienna2: Nazwa zmiennej typu zdefiniowanego przez użytkownika, z której należy skopiować dane.

Jeśli ciąg jest krótszy niż długość zmiennej, funkcja LSet wyrównuje ciąg w obrębie tej zmiennej. Pozostałe znaki ciągu są zastępowane spacjami. Jeśli ciąg jest dłuższy niż długość zmiennej, zostanie skopiowana jedynie określona liczba znaków (równa długości zmiennej) licząc od lewej strony. Instrukcja LSet pozwala także na kopiowanie zmiennej typu zdefiniowanego przez użytkownika do innej zmiennej tego samego typu.

## Przykład:

    Sub ExampleRLSet

    Dim sVar As String

    Dim sExpr As String

        sVar = String(40,"*")

        sExpr = "SBX"

        ' Wyrównanie tekstu "SBX" w obrębie 40-znakowego ciągu odniesienia

        ' Gwiazdki zostaną zastąpione spacjami

        RSet sVar = sExpr

        Print ">"; sVar; "<"

        sVar = String(5,"*")

        sExpr = "123457896"

        RSet sVar = sExpr

        Print ">"; sVar; "<"

        sVar = String(40,"*")

        sExpr = "SBX"

        ' Wyrównanie tekstu "SBX" do lewej w obrębie 40-znakowego ciągu odniesienia

        LSet sVar = sExpr

        Print ">"; sVar; "<"

        sVar = String(5,"*")

        sExpr = "123456789"

        LSet sVar = sExpr

        Print ">"; sVar; "<"

    End Sub