Isi

# Pernyataan RSet

Sejajarkan untai dalam variabel untai, atau menyalin tipe variabel yang ditentukan pengguna ke variabel lain.

### Sintaksis:

    RSet Teks Sebagai Untai = Teks atau RSet Variabel1 = Variabel2

### Parameter:

Teks: Variabel string apa saja.

Teks: String yang ingin Anda ratakan ke kanan variabel string.

Variable1: Variabel yang ditentukan pengguna yang menjadi sasaran untuk variabel yang disalin.

Variabel2: Variabel yang ditentukan pengguna yang ingin Anda salin ke variabel lain.

Jika string lebih pendek dari variabel string, RSet ratakan string ke kanan dalam variabel string. Setiap karakter yang tersisa dalam variabel string diganti dengan spasi. Jika string lebih panjang dari variabel string, karakter yang melebihi panjang variabel dipotong, dan hanya karakter yang tersisa yang diratakan ke kanan dalam variabel string.

Anda juga dapat menggunakan pernyataan RSet untuk menetapkan variabel dari satu jenis yang ditentukan pengguna ke yang lain.

Contoh berikut menggunakan pernyataan RSet dan LSet untuk memodifikasi perataan string kiri dan kanan.

### Contoh:

    Sub ExampleRLSet
    Dim sVar As String
    Dim sExpr As String
        sVar = String(40,"*")
        sExpr = "SBX"
        ' Ratakan ke kanan "SBX" dalam string 40-karakter
        ' Ganti tanda bintang dengan spasi
        RSet sVar = sExpr
        Print ">"; sVar; "<"
        sVar = String(5,"*")
        sExpr = "123457896"
        RSet sVar = sExpr
        Print ">"; sVar; "<"
        sVar = String(40,"*")
        sExpr = "SBX"
        ' Ratakan ke kiri "SBX" dalam string 40-karakter
        LSet sVar = sExpr
        Print ">"; sVar; "<"
        sVar = String(5,"*")
        sExpr = "123456789"
        LSet sVar = sExpr
        Print ">"; sVar; "<"
    End Sub

Topik Terkait

String functions