RSet Statement
Jobbra igazĂt egy karakterláncot egy string (karakterlánc) változĂłn belĂĽl, vagy átmásol egy felhasználĂł által definiált tĂpusĂş változĂłt egy másik változĂłba.
Szintaxis:
RSet Szöveg As String = Szöveg vagy RSet Változó1 = Változó2
Paraméterek:
Szöveg: Bármilyen string (karakterlánc) változó.
Szöveg: Karakterlánc, amelyet a string (karakterlánc) változĂłban jobbra akar igazĂtani.
Változó1: Felhasználó által definiált változó, amely a másolandó változó célja.
Változó2: Felhasználó által definiált változó, amelyet egy másik változóba akar másolni.
Ha a karakterlánc rövidebb a string (karakterlánc) változĂłnál, akkor az RSet jobbra igazĂtja a karakterláncot a string (karakterlánc) változĂłn belĂĽl. A string (karakterlánc) változĂł fennmaradĂł karakterei szĂłközökre cserĂ©lĹ‘dnek. Ha a karakterlánc hosszabb a string (karakterlánc) változĂłnál, akkor a változĂł hosszát meghaladĂł karakterek le lesznek vágva, Ă©s csak a fennmaradĂł karakterek lesznek jobbra igazĂtva a string (karakterlánc) változĂłn belĂĽl.
Az RSet utasĂtás segĂtsĂ©gĂ©vel a felhasználĂł által definiált tĂpusĂş változĂłkat hozzárendelheti másik tĂpushoz.
Az alábbi pĂ©ldák az RSet Ă©s LSet utasĂtást használják a karakterlánc balra Ă©s jobbra igazĂtásának mĂłdosĂtásához.
PĂ©lda:
Sub ExampleRLSet
Dim sVar As String
Dim sExpr As String
sVar = String(40,"*")
sExpr = "SBX"
' „SBX” jobbra igazĂtása egy 40 karakteres karakterláncban
' Csillagok lecserélése szóközökre
RSet sVar = sExpr
Print ">"; sVar; "<"
sVar = String(5,"*")
sExpr = "123457896"
RSet sVar = sExpr
Print ">"; sVar; "<"
sVar = String(40,"*")
sExpr = "SBX"
' „SBX” balra igazĂtása egy 40 karakteres karakterláncban
LSet sVar = sExpr
Print ">"; sVar; "<"
sVar = String(5,"*")
sExpr = "123456789"
LSet sVar = sExpr
Print ">"; sVar; "<"
End Sub