Module
Contents
Index 🔎︎

# GoSub...Return Statement

ཡན་ལག་འཆར་ཅན་བྱ་རིམ་མམ་རྟེན་གྲངས་ནང་གི་གཞི་གྲངས་མཚོན་རྟགས་ཀྱིས་གཏན་འཁེལ་བྱས་པའི་ཡན་ལག་འཆར་ཅན་བྱ་ རིམ་ཁོལ་སྤྱོད་བྱ། གཞི་གྲངས་མཚོན་རྟགས་རྗེས་ཀྱི་རྗོད་པ་ལག་བསྟར་གྱིས་གཤམ་གྱི་ Return རྗོད་པར་སླེབས་པའི་བར་དུ་ཡིན། དེ་རྗེས་བྱ་རིམ་གྱིས་མུ་མཐུད་ GoSub རྗོད་པའི་རྗེས་ཀྱི་རྗོད་པ་ལག་བསྟར་བྱེད།

## བརྡ་འཕྲོད་

    "ཞུགས་གྲངས་"ཆ་ཤས་ལ་དཔྱད་གཟིགས་མཛོད་

## ཁུགས་གྲངས་

Sub/Function

རྗོད་པའི་མིང་

ཤོག་བྱང་

རྗོད་པའི་མིང་

GoSub Label

Exit Sub/Function

Label:

རྗོད་པའི་མིང་

Return

End Sub/Function

GoSub རྗོད་པ་ནི་ཡན་ལག་དཔེ་རིམ་ལམ་རྟེན་གྲངས་ནང་གི་གཞི་གྲངས་མཚོན་རྟགས་ཀྱི་ཆ་ཤས་ཀྱི་ཡན་ལག་དཔེ་རིམ་གསལ་སྟོན་ལ་ཁོལ་སྤྱོད་བྱེད། གཞི་གྲངས་མཚོན་རྟགས་མིང་དེ་ངེས་པར་དུ་འབྱེད་རྟགས་ (":") ཀྱིས་མཇུག་བསྡུ་བའོ།

གལ་ཏེ་ Return རྗོད་པའི་རྗེས་GoSubམེད་པ་ཤེས་ན་ LibreOffice ཧུང་གིས་ནོར་འཁྲུལ་ཞིག་ཕྱིར་ལོག་བྱེད། Exit Sub འམ་ Exit Function སྤྱད་པ་དང་བྱ་རིམ་རྗེས་མའི་ Return རྗོད་པའི་སྔོན་དུ་མ་སླེབས་སྔོན་ལན་ལག་བྱ་རིམ་མམ་རྟེན་གྲངས་ལས་བྲལ་བ་འགན་ལེན་བྱ་ཐུབ།

གཤམ་གྱི་དཔེ་གཞི་ནི་ GoSub དང་ Return བེད་སྤྱོད་གསལ་བཤད་བྱེད་པར་སྤྱོད་པར་ཡིན། བྱ་རིམ་དུམ་བུ་ལག་བསྟར་ཐེངས་མ་གཉིས་ཀྱི་ཉིས་བསྒྱུར་གཞི་རྩིས་རྒྱག་བྱ།

## དཔེ་གཞི་

    Sub ExampleGoSub

    Dim iInputa As Single

    Dim iInputb As Single

    Dim iInputc As Single

        iInputa = Int(InputBox("Enter the first number:","NumberInput"))

        iInputb = Int(InputBox("Enter the second number:","NumberInput"))

        iInputc=iInputa

        GoSub SquareRoot

        Print "The square root of";iInputa;" is";iInputc

        iInputc=iInputb

        GoSub SquareRoot

        Print "The square root of";iInputb;" is";iInputc

        Exit Sub

    SquareRoot:

        iInputc=sqr(iInputc)

        Return

    End Sub