LSet Statement

Выравнивает строку по левому краю строковой переменной или копирует переменную,определенного пользователем типа в переменную другого определенного пользователем типа.

Синтаксис

LSet Переменная As String = Текст или LSet Переменная1 = Переменная2

Параметры:

Переменная. Любая строковая переменная (типа String), содержащая строку, которая должна быть выравнена влево.

Текст. Строка, которая должна быть выравнена по левому краю строковой переменной.

Переменная1. Имя переменной определенного пользователем типа, в которую нужно копировать.

Переменная2. Имя переменной определенного пользователем типа, из которой нужно копировать.

Если данная строка короче, чем строковая переменная, LSet выравнивает влево эту строку в строковой переменной. Любые остающиеся позиции в строковой переменной заменяются пробелами. Если данная строка длиннее, чем строковая переменная, копируются только крайние слева символы, полностью заполняющие длину строковой переменной. С помощью инструкции LSet можно также копировать переменную определенного пользователем типа в другую переменную такого же типа.

Пример:

Sub ExampleRLSet

Dim sVar As String

Dim sExpr As String

    sVar = String(40,"*")

    sExpr = "SBX"

    REM Выравнивание "АБВ" в строке ссылки длиной 40 символов

    REM Замена звездочек пробелами

    RSet sVar = sExpr

    Print ">"; sVar; "<"

    sVar = String(5,"*")

    sExpr = "123457896"

    RSet sVar = sExpr

    Print ">"; sVar; "<"

    sVar = String(40,"*")

    sExpr = "SBX"

    REM Выравнивание влево "АБВ" в строке ссылки длиной 40 символов

    LSet sVar = sExpr

    Print ">"; sVar; "<"

    sVar = String(5,"*")

    sExpr = "123456789"

    LSet sVar = sExpr

    Print ">"; sVar; "<"

End Sub