GoSub...Return Statement
རྒྱུན་ལས་འོག་མ་ཡང་ན་ལས་འགན་ལས་ཁ་ཡིག་གིས་བརྡོ་སྟོན་ཡོད་མི་རྒྱུན་ལས་འོག་མ་ཅིག་བོདཔ་ཨིན། ཁ་ཡིག་རྗོས་སེ་གྲངས་མི་གསལ་བཤད་ཚུ་ཆ་མཉམ་ཤུལ་མ་སླར་ལོག་གསལ་བཤད་ཚུན་ཚོད་ལག་ལེནའཐབ་ཡོདཔ་ཨིན། ཤུལ་ལས་ལས་རིམ་དེ་གསལ་བཤད་ འགྱོ་འོག་མ་གསལ་བཤད་རྗེས་སུ་གྲངས་མི་དང་གཅིག་ཁར་འཕྲོ་མཐུདཔ་ཨིན།
ཚིག་སྦྱོར:
ཚད་བཟུང་ཚུ་བལྟ།
ཚད་བཟུང་ཚུ་:
འོག་མ/ལས་འགན།
གསལ་བཤད་འགག་ནི།
ཁ་ཡིག
གསལ་བཤད་འགག་ནི།
འགྱོ་འོག་མ་ ཁ་ཡིག
ཕྱིར་འཐོན་འོག་མ/ལས་འགན།
ཁ་ཡིག་:
གསལ་བཤད་འགག་ནི།
སླར་ལོག
མཇུག་འོག་མ/ལས་འགན།
འགྱོ་འོག་མ་ གསལ་བཤད་ཀྱིས་ རྒྱུན་ལས་འོག་མ་ཡང་ན་ལས་འགན་ནང་འཁོད་ལས་ཁ་ཡིག་གིས་བརྡ་སྟོན་འབད་མི་རྒྱུན་ལས་འོག་མ་ཉེན་གནས་ཅིག་བོདཔ་ཨིན། ཁ་ཡིག་གི་མིང་་དེ་མཇུག་ཀོ་ལཱོན་གྱིས་བསྡ་དགོཔ་ཨིན (":").
ལས་རིམ་དེ་གིས་སླར་ལོག་གསལ་བཤདའགྱོ་འོག་མ་གྱིས་སྦོམ་མ་བཟོ་མི་གདོང་ཐུག་འབྱུང་པ་ཅིན་ LibreOffice གཞི་རིམ་གྱིས་འཕྲིན་དོན་འཛོལ་བ་ཅིག་སླར་ལོགཔ་ཨིན། ལས་རིམ་དེ་གིས་ཤུལ་མ་སླར་ལོག་གསལ་བཤད་དེ་མ་ལྷོད་པའི་ཧེ་མ་འོག་མ་ཡང་ན་ལས་འགན་གྱིས་བཀོག་བཞག་ཡོད་ངེས་ཏིག་ལུ་ ཕྱིར་ཐོན་འོག་མ་ ཡང་ན་ ཕྱིར་ཐོན་ལས་འགན ལག་ལེན་འཐབ།
འོག་གི་དཔེར་བརྗོད་ཀྱིས་འགྱོ་འོག་མ་ དང་ སླར་ལོག་གི་ལག་ལེན་འཐབ་ཐངས་དེ་འགྲེམས་སྟོནམ་ཨིན། ལས་རིམ་དབྱེ་ཚན་ཚར་གཉིས་ལག་ལེན་འཐབ་དེ་གིས་ ལས་རིམ་གྱིས་ལག་ལེན་པ་གིས་བཙུགས་ཡོད་མི་ཨང་གཉིས་ཀྱི་གྲུ་བཞི་ནར་མོ་རྩ་བ་དེ་རྩིས་སྟོནམ་ཨིན།
དཔེར་བརྗོད:
Sub ExampleGoSub
Dim iInputa As Single
Dim iInputb As Single
Dim iInputc As Single
ཨའི་ཨིན་པུཊི་ཨེ་ = ཨིན་ཊི་(ཨིན་པུཊི་སྒྲོམ་$ "Enter the first number: ","NumberInput"))
ཨའི་ཨིན་པུཊི་བི་ = ཨིནཊི(ཨིན་པུཊི་སྒྲོམ་$ "Enter the second number: ","NumberInput"))
iInputc=iInputa
GoSub SquareRoot
དཔར་བསྐྲུན་འབད་ "The square root of";iInputa;" is"ཨིན་པིཊི་སི།
iInputc=iInputb
GoSub SquareRoot
དཔར་བསྐྲུན་འབད "The square root of";iInputb;" is"ཨའི་ཨིན་པུཊི་་སི།
Exit Sub
SquareRoot:
iInputc=sqr(iInputc)
Return
End Sub