Obsah

# Příkaz Static

Deklaruje proměnnou na úrovni podprogramu v rámci procedury nebo funkce, takže hodnota proměnné je platná i po ukončení procedury či funkce. Také platí konvence příkazu Dim.

Příkaz Static nelze použít k definici dynamických polí. Pole musí mít pevnou velikost.

## Syntaxe:

    Static NázevProměnné[(začátek To konec)] [As TypProměnné][, NázevProměnné2[(začátek To konec)] [As TypProměnné][,...]]

## Příklad:

    Sub ExampleStatic
    Dim iCount As Integer, iResult As Integer
        For iCount = 0 To 2
            iResult = InitVar()
        Next iCount
        MsgBox iResult,0,"Výsledek je"
    End Sub

    ' Funkce pro inicializaci statické proměnné
    Function InitVar() As Integer
        Static iInit As Integer
        Const iMinimum as Integer = 40 ' minimální návratová hodnota této funkce
        if iInit = 0 then ' kontrola inicializace
            iInit = iMinimum
        Else
            iInit = iInit + 1
        End If
        InitVar = iInit
    End Function

Podpořte nás!