Static Statement

Static-lauseella määritellään muuttuja tai taulukko proseduuritasolla proseduurin tai funktion sisällä, niin että muuttujan tai taulukon arvot jäävät voimaan proseduurista tai funktiosta poistuttaessa. Dim-lauseen käytännöt ovat myös voimassa.

Static-lausetta ei voi käyttää muuttuvien taulukoiden määrittelyyn. Taulukot pitää määritellä kooltaan muuttumattomiksi.

Syntaksi:


Static muuttujanimi_1 [(alku_1 To loppu_1)] [As tyyppi_1][, muuttujanimi_2 [(alku_2 To loppu_2)] [As tyyppi_2][,...]]

Esimerkki:


Sub ExampleStatic
Dim iCount As Integer, iResult As Integer
    For iCount = 0 To 2
        iResult = InitVar()
    Next iCount
    MsgBox iResult,0,"Vastaus on"
End Sub
 
' Funktio, jossa staattisia muuttujia alustetaan
Function InitVar() As Integer
    Static iInit As Integer
    Const iMinimum as Integer = 40 ' funktion pienin palautusarvo
    if iInit = 0 then ' tarkistetaan, onko alustettu
        iInit = iMinimum
    Else
        iInit = iInit + 1
    End If
    InitVar = iInit
End Function