Space Function

གཏན་འཁེལ་གྲངས་ཀྱི་སྟོང་མིག་ལས་གྲུབ་པའི་ཡིག་རྟགས་ཕྲེང་བར་་ཕྱིར་ལོག་པ།

བརྡ་འཕྲོད་


Space (n As Long)

ཕྱིར་ལོག་ཐང་

ཡིག་རྟགས་ཕྲེང་བ་

ཁུགས་གྲངས་

n: ཡིག་རྟགས་ཕྲེང་བའི་ནང་སྟོང་མིག་གྲངས་ཚད་ཀྱི་གྲངས་མཚོན་ཚུལ་གྱི་མཚན་འཇོག་ལ་བེད་སྤྱད་པ་ n ཆོག་པའི་ཆེས་ཆེ་ཤོས་ཀྱི་ཐང་ནི་ 65535ཡིན།

Error codes:

5 ནུས་མེད་ཀྱི་བརྒྱུད་རིམ་འཁོར་སྤྱོད་

དཔེ་གཞི་


Sub ExampleSpace
Dim sText As String,sOut As String
Dim iLen As Integer
    iLen = 10
    sText = "Las Vegas"
    sOut = sText & Space(iLen) & sText & Chr(13) &_
    sText & Space(iLen*2) & sText & Chr(13) &_
    sText & Space(iLen*4) & sText & Chr(13)
    msgBox sOut,0,"Info:"
End Sub