LibreOffice 25.8 Help
តម្រឹមស្តាំនូវខ្សែអក្សរមួយក្នុងអថេរខ្សែអក្សរ ឬចម្លងប្រភេទអថេរដែលកំណត់ដោយអ្នកប្រើទៅក្នុងប្រភេទអថេរមួយផ្សេងទៀត ។
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