IBM Lotus Symphony


Príkaz RSet [Runtime]

Zarovná doprava reťazec v reťazcovej premennej alebo skopíruje typ premennej zadaný užívateľom na iný typ.

Syntax:

RSet text ako typ String = text alebo RSet premenná_1 = premenná_2

Parametre:

Text: ľubovoľná reťazcová premenná.

Text: reťazec, ktorý chcete zarovnať doľava v reťazcovej premennej.

Premenná_1: premenná definovaná užívateľom, ktorá je cieľom kopírovanej premennej.

Premenná_2: premenná definovaná užívateľom, ktorú chcete kopírovať do inej premennej.

Ak je reťazec kratší ako reťazcová premenná, príkaz RSet zarovnáva doprava reťazec v reťazcovej premennej. Ostatné zostávajúce pozície v reťazcovej premennej sa nahradia medzerami. Ak je reťazec dlhší ako reťazcová premenná, znaky presahujúce dĺžku premennej sa orežú a iba zostávajúce znaky sa zarovnajú doprava v reťazcovej premennej.

Môžete tiež používať príkaz RSet na priradenie premenných jedného typu definovaného užívateľom inému typu.

Nasledujúci príklad používa príkazy RSet a LSet na modifikáciu zarovnania reťazca doľava a doprava.

Príklad:

Sub Príklad_RLSet

Dim sVar as string

Dim sExpr as string

sVar = String(40,"*")

sExpr = "SBX"

REM Right-align "SBX" in a 40-character string

REM Nahraďte hviezdičky medzerami

RSet sVar = sExpr

Print ">"; sVar; "<"

sVar = String(5,"*")

sExpr = "123457896"

RSet sVar = sExpr

Print ">"; sVar; "<"

sVar = String(40,"*")

sExpr = "SBX"

REM Left-align "SBX" in a 40-character string

LSet sVar = sExpr

Print ">"; sVar; "<"

sVar = String(5,"*")

sExpr = "123456789"

LSet sVar = sExpr

Print ">"; sVar; "<"

End Sub


Spätná väzba na produkt | Ďalšia dokumentácia | Ochranné známky