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

Please support us!