IBM Lotus Symphony
|
Justerer en streng til venstre for en strengvariabel, eller kopierer en variabel av en brukerdefinert type til en annen variabel av en annen brukerdefinert type.
LSet Var As String = Tekst eller LSet Var1 = Var2
Var: En strengvariabel som inneholder strengen som du vil justere til venstre.
Tekst: Streng som du vil justere til venstre for strengvariabelen.
Var1: Navnet på den brukerdefinerte typen variabel som du vil kopiere til.
Var2: Navnet på den brukerdefinerte typen variabel som du vil kopiere fra.
Hvis strengen er kortere enn strengvariabelen, vil LSet venstrejustere strengen innenfor strengvariabelen. Eventuell gjenstående posisjoner i strengvariabelen blir erstattet med mellomrom. Hvis strengen er lengre enn strengvariabelen, vil bare tegnene lengst til venstre opp til lengden av strengvariabelen kopiert. Med LSet-setningen kan du også kopiere en variabel av en brukerdefinert type til en annen variabel av samme type.
Sub ExampleRLSet
Dim sVar As String
Dim sExpr As String
sVar = String(40,"*")
sExpr = "SBX"
REM Juster "SBX" innenfor referansestrengen 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" innenfor referansestrengen på 40 tegn
LSet sVar = sExpr
Print ">"; sVar; "<"
sVar = String(5,"*")
sExpr = "123456789"
LSet sVar = sExpr
Print ">"; sVar; "<"
End Sub