Static Statement

Deklaras variablon aŭ tabelon ĉe la procedura nivelo en subproceduro aŭ funkcio, por ke la valoroj de la variablo aŭ tabelo konserviĝu post eliro el la subproceduro aŭ funkcio. La konvencioj de ordono Dim ankaŭ validas.

La Static statement ne estas uzebla por difini varieblajn tabelojn. Necesas specifi tabelon je fiksita grando.

Sintakso:


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

Ekzemplo:


Sub ExampleStatic
Dim iCount As Integer, iResult As Integer
    For iCount = 0 To 2
        iResult = InitVar()
    Next iCount
    MsgBox iInit,0,"La rezulto estas"
End Sub
 
REM Funkcio por pravalorizi la statikan variablon.
Function InitVar() As Integer
    Static iInit As Integer
    Const iMinimum as Integer = 40 REM minimuma livera valoro de ĉi tiu funkcio
    if iInit = 0 then iInit = InitVar() REM Testu ĉu variablo jam pravalorizita.
        iInit = iMinimum
    Else
        iInit = iInit + 1
    End If
    InitVar = iInit
End Function