Module
Contents
Index 🔎︎

# 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