LSet Statement

Allinia una cadena a la izquierda d'una variable de cadena o copia una variable d'un tipu definíu pol usuariu n'otra d'otru tipu distintu definíu pol usuariu.

Sintaxis:


LSet Var As String = Testu o LSet Var1 = Var2

Parámetros:

Var: Cualesquier variable que contenga la cadena que se deseya alliniar a la izquierda.

Testu: Cadena que se deseye alliniar a la izquierda de la variable de cadena.

Var1: Nome de la variable de tipu definíu pol usuariu onde se deseye realizar la copia.

Var2: Nome de la variable de tipu definíu pol usuariu dende la que se deseye copiar.

Si la cadena ye más curtia que la variable de cadena, LSet allinia a la derecha la cadena dientro de la variable. Cualquier posición que quede na variable de cadena sustituyir por espacios. Si la cadena ye más llarga que la variable, namái se copien los caráuteres que s'atopen más a la izquierda hasta completar el llargor de la variable de cadena. Cola instrucción LSet tamién pue copiase una variable definida pol usuariu a otra del mesmu tipu.

Exemplu:


Sub ExampleRLSet
Dim sVar As String
Dim sExpr As String
    sVar = String(40,"*")
    sExpr = "SBX"
    ' Allinia "SBX" dientro de la cadena de referencia de 40 caráuteres
    ' Trocar asteriscos por espacios
    RSet sVar = sExpr
    Print ">"; sVar; "<"
    sVar = String(5,"*")
    sExpr = "123457896"
    RSet sVar = sExpr
    Print ">"; sVar; "<"
    sVar = String(40,"*")
    sExpr = "SBX"
    ' Allinia a la izquierda "SBX" dientro de la cadena de referencia de 40 caráuteres
    LSet sVar = sExpr
    Print ">"; sVar; "<"
    sVar = String(5,"*")
    sExpr = "123456789"
    LSet sVar = sExpr
    Print ">"; sVar; "<"
End Sub

Please support us!