IBM Lotus Symphony
|
Służy do wskazywania, że wartość zmiennej lub tablicy zadeklarowanej na poziomie procedury podrzędnej lub funkcji ma zostać zachowana po wyjściu z danej procedury lub funkcji. Prawidłowe są także konstrukcje z instrukcją Dim.
![]() |
Instrukcja Static nie może być używana do definiowania tablic zmiennych. Tablice muszą mieć określoną stałą wielkość. |
Static Nazwa_zmiennej[(początek To koniec)] [As Typ_zmiennej][, Nazwa_zmiennej2[(początek To koniec)] [As Typ_zmiennej][,...]]
Sub Przyklad_Static
Dim iLicznik as Integer, iWynik as Integer
For iLicznik = 0 to 2
iWynik = InitVar()
Next iLicznik
MsgBox iWynik,0,"Odpowiedź to"
End Sub
REM Funkcja inicjująca zmienną statyczną
Function InicjujZm() As Integer
Static iZm As Integer
Const iMinimum as Integer = 40 REM minimalna wartość zwracana przez tę funkcję
if iZm = 0 then REM sprawdzenie zainicjowania
iZm = iMinimum
else
iZm = iZm + 1
end if
InicjujZm = iZm
End Function