Module
Contents
Index 🔎︎

# 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