IBM Lotus Symphony
|
Højrejusterer en streng i en strengvariabel eller kopierer en brugerdefineret variabeltype til en anden.
RSet Tekst As String = Tekst eller RSet Variabel1 = Variabel2
Tekst: En strengvariabel.
Tekst: En streng, der skal højrejusteres i strengvariablen.
Variabel1: Brugerdefineret variabel, der er målet for den kopierede variabel.
Variabel2: Brugerdefineret variabel, der skal kopieres til en anden variabel.
Hvis strengen er kortere end strengvariablen, højrejusterer RSet strengen i strengvariablen. Eventuelle overskydende tegn i strengvariablen erstattes af mellemrum. Hvis strengen er længere end strengvariablen, afkortes de tegn, der overstiger strengvariablens længde, og kun de resterende tegn højrejusteres inden for strengvariablen.
Du kan også bruge sætningen RSet til at tildele én brugerdefineret variabel til en anden variabel.
Følgende eksempel anvender RSet- og LSet-sætningerne til at revidere venstre- og højrejusteringen af en streng.
Sub EksempelRLSet
Dim sVar As String
Dim sUdtr As String
sVar = String(40,"*")
sUdtr = "SBX"
REM Højrejuster "SBX" i en streng på 40 tegn
REM Erstat stjerner med mellemrum
RSet sVar = sUdtr
Print ">"; sVar; "<"
sVar = String(5,"*")
sUdtr = "123457896"
RSet sVar = sUdtr
Print ">"; sVar; "<"
sVar = String(40,"*")
sUdtr = "SBX"
REM Venstrejuster "SBX" i en streng på 40 tegn
LSet sVar = sUdtr
Print ">"; sVar; "<"
sVar = String(5,"*")
sUdtr = "123456789"
LSet sVar = sUdtr
Print ">"; sVar; "<"
End Sub