Contents
Index 🔎︎

# RSet Statement

Zarovná text typu String vpravo v rámci premennej typu String alebo skopíruje používateľom definovaný typ premennej do inej.

## Syntax:

    RSet Text As String = Text alebo RSet Premenná1 = Premenná2

## Paremetre:

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.

## Príklad:

    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