LSet Statement

将某个字符串变量中的字符串左对齐，或者将自定义类型的变量复制到其他自定义的类型变量。

语法：

LSet Var As String = Text or LSet Var1 = Var2

参数：

Var：含有要左对齐的字符串的字符串变量。

Text：字符串变量中要左对齐的字符串。

Var1：复制时目标自定义类型变量的名称。

Var2：要复制到其他变量的自定义类型变量的名称。

如果字符串变量的长度大于字符串的长度，LSet 左对齐字符串变量中的字符串，字符串变量中剩余的位置用空格代替。如果字符串变量的长度小于字符串的长度，则仅复制字符串中前 n 个字符，n 由字符串变量的长度决定。LSet 语句还可用于将自定义类型的变量复制到相同类型的其他变量。

示例：

Sub ExampleRLSet

Dim sVar As String

Dim sExpr As String

    sVar = String(40,"*")

    sExpr = "SBX"

    ' 在长度为 40 个字符的引用字符串中对齐 "SBX"

    ' 用空格代替星号

    RSet sVar = sExpr

    Print ">"; sVar; "<"

    sVar = String(5,"*")

    sExpr = "123457896"

    RSet sVar = sExpr

    Print ">"; sVar; "<"

    sVar = String(40,"*")

    sExpr = "SBX"

    ' 在长度为 40 个字符的引用字符串中左对齐 "SBX"

    LSet sVar = sExpr

    Print ">"; sVar; "<"

    sVar = String(5,"*")

    sExpr = "123456789"

    LSet sVar = sExpr

    Print ">"; sVar; "<"

End Sub