Contents

# Static Statement

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

Static རྗོད་པ་ཆེ་ཆུང་འགྱུར་རུང་གི་ཚོ་གྲངས་མཚན་འཇོག་ལ་སྤྱོད་མི་རུང་ ཆེ་ཆུང་རྒྱས་བཅད་ཀྱི་ཚོ་གྲངས་མཚན་འཇོག་བྱ་རྒྱུ་ཁོ་ནར་སྤྱོད་དགོས།

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

    Static VarName[(start To end)] [As VarType], VarName2[(start To end)] [As VarType], ...

## དཔེ་གཞི་

    Sub ExampleStatic
    Dim iCount As Integer, iResult As Integer
        For iCount = 0 To 2
            iResult = InitVar()
        Next iCount
        MsgBox iInit,0,"The answer is"
    End Sub

    REM སྡོད་རྣམ་འགྱུར་ཚད་ཐོག་མ་ཅན་གྱི་རྟེན་གྲངས་ལ་སྤྱོད་
    Function InitVar() As Integer
        Static iInit As Integer
        Const iMinimum As Integer = 40 ' minimum return value of this function
        If iInit = 0 Then ' check if initialized
            iInit = iMinimum
        Else
            iInit = iInit + 1
        End If
        InitVar = iInit
    End Function