RSet 语句

右对齐字符串变量中的字符串，或将自定义变量类型复制为其他变量。

语法:


RSet Text As String = Text or RSet Variable1 = Variable2

参数:

「Text」: 任意字符串变量。

「Text」: 字符串变量中要右对齐的字符串。

「Variable1」:复制变量时的目标自定义变量。

「Variable2」:要复制到其他变量的自定义变量。

如果字符串变量的长度大于字符串的长度，「RSet」右对齐字符串变量中的字符串，字符串变量中剩余的字符用空格代替。如果字符串变量的长度小于字符串的长度，则超出变量长度的字符将被截去，而仅右对齐剩下的字符。

您也可以使用「RSet 语句」将自定义类型变量指定为其他变量。

以下示例使用「RSet」和「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

String functions