Содержимое

# 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

См. также

Функция String

Пожалуйста, поддержите нас!