Innehåll

# RSet Statement

Högerjusterar en sträng inom en strängvariabel eller kopierar en användardefinierad variabeltyp till en annan.

### Syntax:

    RSet Text As String = Text or RSet Variabel1 = Variabel2

### Parametrar:

Text: En strängvariabel.

Text: Sträng som du vill högerjustera i strängvariabeln.

Variabel1: Användardefinierad variabel som är målet för den kopierade variabeln.

Variabel2: Användardefinierad variabel som du vill kopiera till en annan variabel.

Om strängen är kortare än strängvariabeln högerjusterar RSet strängen inom strängvariabeln. Alla återstående tecken i strängvariabeln ersätts med blanksteg. Om strängen är längre än strängvariabeln avkortas de tecken som överstiger variabelns längd och bara de tecken som återstår högerjusteras i strängvariabeln.

Du kan även använda RSet-satsen om du vill tilldela variabler av en användardefinierad typ till en annan.

I följande exempel används satserna RSet och LSet för att ändra vänster- och högerjusteringen i en sträng.

### Exempel:

    Sub ExampleRLSet
    Dim sVar As String
    Dim sExpr As String
        sVar = String(40,"*")
        sExpr = "SBX"
        ' Högerjustera "SBX" i en 40-teckenssträng
        ' Ersätt asterisker med blanksteg
        RSet sVar = sExpr
        Print ">"; sVar; "<"
        sVar = String(5,"*")
        sExpr = "123457896"
        RSet sVar = sExpr
        Print ">"; sVar; "<"
        sVar = String(40,"*")
        sExpr = "SBX"
        ' Vänsterjustera "SBX" i en 40-teckenssträng
        LSet sVar = sExpr
        Print ">"; sVar; "<"
        sVar = String(5,"*")
        sExpr = "123456789"
        LSet sVar = sExpr
        Print ">"; sVar; "<"
    End Sub

Närliggande ämnen

String functions