RSet Statement

តម្រឹមស្តាំនូវខ្សែអក្សរមួយក្នុងអថេរខ្សែអក្សរ ឬចម្លងប្រភេទអថេរដែលកំណត់ដោយអ្នកប្រើទៅក្នុងប្រភេទអថេរមួយផ្សេងទៀត ។

វាក្យសម្ពន្ធ ៖

RSet Text As String = Text ឬ RSet Variable1 = Variable2

ប៉ារ៉ាម៉ែត្រ ៖

អត្ថបទ ៖ អថេរខ្សែអក្សរណាមួយ ។

អត្ថបទ៖ ខ្សែអក្សរដែលអ្នកចង់តម្រឹមស្តាំក្នុងអថេរខ្សែអក្សរ ។

Variable1 ៖ អថេរកំណត់ដោយអ្នកប្រើ ដែលជាគោលដៅសម្រាប់អថេរដែលបានចម្លង ។

Variable2 ៖ អថេរកំណត់ដោយអ្នកប្រើ ដែលអ្នកចង់ចម្លងទៅអថេរផ្សេងទៀត ។

ប្រសិនបើខ្សែអក្សរខ្លីជាងអថេរខ្សែអក្សរ RSet តម្រឹមខ្សែអក្សរទៅខាងស្តាំក្នុងអថេរខ្សែអក្សរ ។ តួអក្សរដែលនៅសល់ក្នុងអថេរខ្សែអក្សរ ត្រូវបានជំនួសដោយដកឃ្លា ។ ប្រសិនបើខ្សែអក្សរវែងជាងអថេរខ្សែអក្សរ តួអក្សរដែលលើសប្រវែងនៃអថេរ ត្រូវបានកាត់ឲ្យខ្លី ហើយមានតែតួអក្សរដែលនៅសល់ប៉ុណ្ណោះដែលត្រូវបានតម្រឹមស្តាំក្នុងអថេរខ្សែអក្សរ ។

អ្នកក៏អាចប្រើ សេចក្តីថ្លែងការណ៍ RSet ដើម្បីផ្តល់តម្លៃអថេរនៃប្រភេទមួយដែលបានកំណត់ដោយអ្នកប្រើទៅមួយផ្សេងទៀត ។

ឧទាហរណ៍ដូចខាងក្រោម ប្រើសេចក្តីថ្លែងការណ៍ RSet និងLSet ដើម្បីកែប្រែការតម្រឹមឆ្វេង និងស្តាំនៃខ្សែអក្សរមួយ ។

ឧទាហរណ៍ ៖

Sub ExampleRLSet

Dim sVar As String

Dim sExpr As String

    sVar = String(40,"*")

    sExpr = "SBX"

    REM  Right-align "SBX" in a 40-character string

    REM  ជំនួសសញ្ញាផ្កាយដោយដកឃ្លា

    RSet sVar = sExpr

    Print ">"; sVar; "<"

    sVar = String(5,"*")

    sExpr = "123457896"

    RSet sVar = sExpr

    Print ">"; sVar; "<"

    sVar = String(40,"*")

    sExpr = "SBX"

    REM Left-align "SBX" in a 40-character string

    LSet sVar = sExpr

    Print ">"; sVar; "<"

    sVar = String(5,"*")

    sExpr = "123456789"

    LSet sVar = sExpr

    Print ">"; sVar; "<"

End Sub

RSet Statement

វាក្យ​សម្ពន្ធ ៖

ប៉ារ៉ាម៉ែត្រ ៖

ឧទាហរណ៍ ៖

វាក្យសម្ពន្ធ ៖