LibreOffice 7.5 Help
λ¬Έμμ΄μ λ¬Έμμ΄ λ³μμ μΌμͺ½μ λ§μΆκ±°λ μ¬μ©μ μ μ μ νμ λ³μλ₯Ό λ€λ₯Έ μ¬μ©μ μ μ μ νμ λ³μμ 볡μ¬ν©λλ€.
LSet Var As String = Text λλ LSet Var1 = Var2
Var: μΌμͺ½μ λ§μΆ λ¬Έμμ΄μ΄ ν¬ν¨λ μμμ λ¬Έμμ΄ λ³μμ λλ€.
Text: λ¬Έμμ΄ λ³μμ μΌμͺ½μ λ§μΆ λ¬Έμμ΄μ λλ€.
Var1: 볡μ¬ν λ³μλ₯Ό 볡μ¬ν μ¬μ©μ μ μ μ ν λ³μμ μ΄λ¦μ λλ€.
Var2: λ€λ₯Έ λ³μμ 볡μ¬ν μ¬μ©μ μ μ μ ν λ³μμ μ΄λ¦μ λλ€.
λ¬Έμμ΄μ΄ λ¬Έμμ΄ λ³μλ³΄λ€ μ§§μ κ²½μ° LSetμ λ¬Έμμ΄ λ³μ λ΄μμ λ¬Έμμ΄μ μΌμͺ½μΌλ‘ λ§μΆ₯λλ€. λ¬Έμμ΄ λ³μμ λλ¨Έμ§ λΆλΆμ λͺ¨λ 곡백μΌλ‘ λ°λλλ€. λ¬Έμμ΄μ΄ λ¬Έμμ΄ λ³μλ³΄λ€ κΈΈ κ²½μ° λ§¨ μΌμͺ½ λ¬Έμκ° λ¬Έμμ΄ λ³μ κΈΈμ΄λ§νΌλ§ 볡μ¬λ©λλ€. λν LSet λ¬Έμ μ¬μ©νλ©΄ μ¬μ©μ μ μ μ ν λ³μλ₯Ό λμΌν μ νμ λ€λ₯Έ λ³μμ 볡μ¬ν μ μμ΅λλ€.
Sub ExampleRLSet
Dim sVar As String
Dim sExpr As String
sVar = String(40,"*")
sExpr = "SBX"
REM Align "SBX" within the 40-character reference string
REM Replace asterisks with spaces
RSet sVar = sExpr
Print ">"; sVar; "<"
sVar = String(5,"*")
sExpr = "123457896"
RSet sVar = sExpr
Print ">"; sVar; "<"
sVar = String(40,"*")
sExpr = "SBX"
REM Left-align "SBX" within the 40-character reference string
LSet sVar = sExpr
Print ">"; sVar; "<"
sVar = String(5,"*")
sExpr = "123456789"
LSet sVar = sExpr
Print ">"; sVar; "<"
End Sub