RSet Statement

གཡས་སྙོམས་གཤིབ་ཀྱི་ཡིག་རྟགས་ཕྲེང་བའི་འགྱུར་ཚད་ནང་གི་ཡིག་རྟགས་ཕྲེང་བའམ་སྤྱོད་པོས་རིགས་དེ་འགྱུར་ཚད་གཞན་དུ་འདྲ་ཕབ་ལ་རང་ངེས་བྱས་པ།

བརྡ་འཕྲོད་

RSet Text As String = Text or RSet Variable1 = Variable2

ཁུགས་གྲངས་

Text ཡིག་རྟགས་ཕྲེང་བའི་འགྱུར་ཚད་གང་རུང་།

Text:ཡིག་རྟགས་ཕྲེང་བའི་འགྱུར་ཚད་ནང་གཡོན་སྙོམས་གཤིབ་དགོས་རྒྱུའི་ཡིག་རྟགས་ཕྲེང་བ།

Variable1 འགྱུར་ཚད་འདྲ་ཕབ་སྐབས་ཀྱི་དམིགས་ལྡན་སྤྱོད་པོས་འགྱུར་ཚད་ལ་མཚན་འཇོག་བྱ་རྒྱུ།

Variable2 འགྱུར་ཚད་གཞན་གྱི་སྤྱོད་པོས་མཚན་ཉེད་བཞག་པའི་འགྱུར་ཚད་དུ་འདྲ་ཕབ་བྱ་བ།

གལ་སྲིད་ཡིག་རྟགས་ཕྲེང་བའི་འགྱུར་ཚད་ཀྱི་རིང་ཚད་དེ་ཡིག་རྟགས་ཕྲེང་བའི་རིང་ཚད་ལས་ཆེཆེ་བ་ཡོད་ན་RSet ཡིག་རྟགས་ཕྲེང་བའི་འགྱུར་ཚད་ཀྱི་ཡིག་རྟགས་ཕྲེང་བ་གཡས་སྙོམས་གཤིབ་བྱ་དགོས་ ཡིག་རྟགས་ཕྲེང་བའི་འགྱུར་ཚད་ནང་ལྷག་འཕྲོའི་ཡིག་རྟགས་ལ་སྟོང་མིག་གིས་ཚབ་བྱ་དགོས། གལ་སྲིད་ཡིག་རྟགས་ཕྲེང་བའི་འགྱུར་ཚད་ཀྱི་རིང་ཚད་དེ་ཡིག་རྟགས་ཕྲེང་བའི་རིང་ཚད་ལས་ཆུང་བ་ཡོད་ན་འགྱུར་ཚད་རིང་ཚད་ལས་བརྒལ་བའི་ཡིག་རྟགས་རྣམས་བྲེགས་ཏེ་ལྷག་འཕྲེའི་ཡིག་རྟགས་ཁོ་ན་གཡས་སྙོམས་གཤིབ་བྱ་དགོས།

RSet རྗོད་པ་ད་དུང་སྤྱོད་པོས་རིགས་འགྱུར་ཚད་ཉིད་འགྱུར་ཚད་གཞན་དུ་གཏན་འཁེལ་གྱི་རང་བཟོར་སྤྱོད་ཆོག

གཤམ་གྱི་དཔེ་གཞི་ RSet དང་ LSet རྗོད་པ་བེད་སྤྱད་ནས་ཡིག་རྟགས་ཕྲེང་བའི་གཡས་སྙོམས་གཤིབ་དང་གཡས་སྙོམས་གཤིབ་ལ་བཟོ་བཅོས་ཐུབ།

དཔེ་གཞི་

Sub ExampleRLSet

Dim sVar As String

Dim sExpr As String

    sVar = String(40,"*")

    sExpr = "SBX"

    REM རིང་ཚད་ཡིག་རྟགས་ 40ཡིན་པའི་འདྲིན་སྤྱོད་ཡིག་རྟགས་ཕྲེང་བའི་ནང་གཡོན་སྙོམས་གཤིབ་"SBX"

    REM གྱིས་སྟོང་མིག་གིས་སྐར་རྟགས་ཀྱི་ཚབ་བྱེད་པ་

    RSet sVar = sExpr

    Print ">"; sVar; "<"

    sVar = String(5,"*")

    sExpr = "123457896"

    RSet sVar = sExpr

    Print ">"; sVar; "<"

    sVar = String(40,"*")

    sExpr = "SBX"

    REM རིང་ཚད་ཡིག་རྟགས་ 40 ཡིན་པའི་ཡིག་རྟགས་ཕྲེང་བའི་ནང་གཡས་སྙོམས་གཤིབ་"SBX"

    LSet sVar = sExpr

    Print ">"; sVar; "<"

    sVar = String(5,"*")

    sExpr = "123456789"

    LSet sVar = sExpr

    Print ">"; sVar; "<"

End Sub