IBM Lotus Symphony
|
Venstrejusterer en streng i en strengvariabel eller kopierer en variabel med en brugerdefineret type til en anden variabel med en anden brugerdefineret type.
LSet Var As String = Tekst eller LSet Var1 = Var2
Var: En strengvariabel, der indeholder den streng, som skal venstrejusteres.
Tekst: En streng, der skal venstrejusteres i strengvariablen.
Var1: Navnet på den variabel med en brugerdefineret type, der skal kopieres til.
Var2: Navnet på den variabel med en brugerdefineret type, der skal kopieres fra.
Hvis strengen er kortere end strengvariablen, venstrejusterer LSet strengen i strengvariablen. Eventuelle overskydende positioner i strengvariablen erstattes af mellemrum. Hvis strengen er længere end strengvariablen, kopieres kun tegnene fra venstre og indtil strengvariablens længde. Du kan også bruge sætningen LSet til at kopiere en variabel med en brugerdefineret type til en anden variabel med samme type.
Sub EksempelRLSet
Dim sVar As String
Dim sUdtr As String
sVar = String(40,"*")
sUdtr = "SBX"
REM Justér "SBX" inden for referencestrengen 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" inden for referencestrengen på 40 tegn
LSet sVar = sUdtr
Print ">"; sVar; "<"
sVar = String(5,"*")
sUdtr = "123456789"
LSet sVar = sUdtr
Print ">"; sVar; "<"
End Sub