LibreOffice 25.2 Help
Zarovná text typu String vpravo v rámci premennej typu String alebo skopíruje používateľom definovaný typ premennej do inej.
RSet Text As String = Text alebo RSet Premenná1 = Premenná2
Text: Akýkoľvek reťazec.
Text: Reťazec, ktorý chcete zarovnať vpravo v reťazcovej premennej.
Premenná1: Názov premennej používateľom definovaného typu, do ktorej chcete kopírovať.
Premenná2: Názov premennej používateľom definovaného typu, ktorú chcete kopírovať.
Ak je reťazec kratší ako reťazcová premenná, RSet zarovná reťazec vpravo v reťazcovej premennej. Zostávajúce miesta v reťazci budú nahradené medzerami. Ak je reťazec dlhší ako reťazcová premenná, znaky prekračujúce dĺžku premennej budú orezané a zostávajúce znaky budú zarovnané vpravo.
Príkaz RSet je tiež je možné použiť na priradenie premennej používateľom definovaného typu do inej premennej rovnakého typu.
Nasledujúci príklad používa príkazy RSet a LSet na úpravu ľavého a pravého zarovnania reťazca.
Sub ExampleRLSet
Dim sVar As String
Dim sExpr As String
    sVar = String(40,"*")
    sExpr = "SBX"
    REM Zarovná "SBX" vpravo v 40-znakovom reťazci
    REM nahradí hviezdičky medzerami
    RSet sVar = sExpr
    Print ">"; sVar; "<"
    sVar = String(5,"*")
    sExpr = "123457896"
    RSet sVar = sExpr
    Print ">"; sVar; "<"
    sVar = String(40,"*")
    sExpr = "SBX"
    REM Zarovná "SBX" vľavo v 40-znakovom reťazci
    LSet sVar = sExpr
    Print ">"; sVar; "<"
    sVar = String(5,"*")
    sExpr = "123456789"
    LSet sVar = sExpr
    Print ">"; sVar; "<"
End Sub