Anweisung LSet

Ordnet eine Zeichenkette linksbĂŒndig innerhalb einer Zeichenkettenvariablen an oder kopiert eine Variable eines benutzerdefinierten Datentyps in eine andere Variable eines benutzerdefinierten Datentyps.

Syntax:


LSet Var As String = Text or LSet Var1 = Var2

Parameter:

Var: Eine beliebige Zeichenkettenvariable, welche die links auszurichtende Zeichenkette enthÀlt.

Text: Zeichenkette, die Sie innerhalb der Zeichenkettenvariable links ausrichten möchten.

Var1: Name der zu kopierenden benutzerdefinierten Variable.

Var2: Name der zu kopierenden benutzerdefinierten Variable.

Ist die Zeichenkette kĂŒrzer als die Zeichenkettenvariable, ordnet die Anweisung LSet die Zeichenkette linksbĂŒndig in der Zeichenkettenvariablen an. Die freien Stellen der Zeichenkettenvariablen werden mit Leerzeichen aufgefĂŒllt. Ist die Zeichenkette lĂ€nger, werden nur soviele Zeichen der Zeichenkette linksbĂŒndig in der Zeichenkettenvariablen angeordnet, wie diese aufnehmen kann. Mit der Anweisung LSet ist es außerdem möglich, die Variable eines benutzerdefinierten Datentyps in eine andere des selben Datentyps zu kopieren.

Beispiel:


Sub ExampleRLSet
Dim sVar As String
Dim sExpr As String
    sVar = String(40,"*")
    sExpr = "SBX"
    ' "SBX" Im 40 Zeichen langen Referenzstring rechts ausrichten
    ' Die Sternchen durch Leerzeichen ersetzen
    RSet sVar = sExpr
    Print ">"; sVar; "<"
    sVar = String(5,"*")
    sExpr = "123457896"
    RSet sVar = sExpr
    Print ">"; sVar; "<"
    sVar = String(40,"*")
    sExpr = "SBX"
    ' "SBX" im 40 Zeichen langen Referenzstring links ausrichten
    LSet sVar = sExpr
    Print ">"; sVar; "<"
    sVar = String(5,"*")
    sExpr = "123456789"
    LSet sVar = sExpr
    Print ">"; sVar; "<"
End Sub

Bitte unterstĂŒtzen Sie uns!