IBM Lotus Symphony
|
Høyrejusterer en streng i en strengvariabel, eller kopierer en brukerdefinert variabeltype til en annen.
RSet Tekst som streng = Tekst eller RSet Variabel1 = Variabel2
Tekst: En strengvariabel.
Tekst: Streng som du vil høyrejustere i strengvariabelen.
Variabel1: Brukerdefinert variabel som er målet for den kopierte variabelen.
Variabel2: Brukerdefinert variabel som du vil kopiere til en annen variabel.
Hvis strengen er kortere enn strengvariabelen, vil RSet justere strengen til høyre innenfor strengvariabelen. Eventuelle gjenstående tegn i strengvariabelen blir erstattet med mellomrom. Hvis strengen er lengre enn strengvariabelen, blir tegnene som går ut over lengden av variabelen bli avkuttet, og bare de gjenværende tegnene blir høyrejustert innenfor strengvariabelen.
Du kan også bruke RSet-setningen til å tildele variabler av en brukerdefinert type til en annen.
Det følgende eksempelet bruker RSet- og LSet-uttrykkene til å endre venstre- og høyrejusteringen av en streng.
Sub ExampleRLSet
Dim sVar as string
Dim sExpr as string
sVar = String(40,"*")
sExpr = "SBX"
REM Høyrejuster "SBX" i en streng på 40 tegn
REM Erstatt stjerner med mellomrom
RSet sVar = sExpr
Print ">"; sVar; "<"
sVar = String(5,"*")
sExpr = "123457896"
RSet sVar = sExpr
Print ">"; sVar; "<"
sVar = String(40,"*")
sExpr = "SBX"
REM Venstrejuster "SBX" i en streng på 40 tegn
LSet sVar = sExpr
Print ">"; sVar; "<"
sVar = String(5,"*")
sExpr = "123456789"
LSet sVar = sExpr
Print ">"; sVar; "<"
End Sub