LibreOffice 24.8 Hjälp
Högerjusterar en sträng inom en strängvariabel eller kopierar en användardefinierad variabeltyp till en annan.
RSet Text As String = Text or RSet Variabel1 = Variabel2
Text: En strängvariabel.
Text: Sträng som du vill högerjustera i strängvariabeln.
Variabel1: Användardefinierad variabel som är målet för den kopierade variabeln.
Variabel2: Användardefinierad variabel som du vill kopiera till en annan variabel.
Om strängen är kortare än strängvariabeln högerjusterar RSet strängen inom strängvariabeln. Alla återstående tecken i strängvariabeln ersätts med blanksteg. Om strängen är längre än strängvariabeln avkortas de tecken som överstiger variabelns längd och bara de tecken som återstår högerjusteras i strängvariabeln.
Du kan även använda RSet-satsen om du vill tilldela variabler av en användardefinierad typ till en annan.
I följande exempel används satserna RSet och LSet för att ändra vänster- och högerjusteringen i en sträng.
Sub ExampleRLSet
Dim sVar As String
Dim sExpr As String
    sVar = String(40,"*")
    sExpr = "SBX"
    ' Högerjustera "SBX" i en 40-teckenssträng
    ' Ersätt asterisker med blanksteg
    RSet sVar = sExpr
    Print ">"; sVar; "<"
    sVar = String(5,"*")
    sExpr = "123457896"
    RSet sVar = sExpr
    Print ">"; sVar; "<"
    sVar = String(40,"*")
    sExpr = "SBX"
    ' Vänsterjustera "SBX" i en 40-teckenssträng
    LSet sVar = sExpr
    Print ">"; sVar; "<"
    sVar = String(5,"*")
    sExpr = "123456789"
    LSet sVar = sExpr
    Print ">"; sVar; "<"
End Sub