IBM Lotus Symphony
|
Deklaruje premennú alebo pole na úrovni procedúry v rámci podprogramu alebo funkcie, takže hodnoty premennej alebo poľa v nej zostávajú po výstupe z tejto procedúry alebo funkcie. Konvencie príkazu Dim sú tiež platné.
![]() |
Príkaz Static nemôže byť použitý na definovanie polí premennej. Polia sa musia zadávať podľa stanovenej veľkosti. |
Static názov_premennej[(začiatok To koniec)] [ako typ_premennej][, názov_premennej_2[(začiatok To koniec)] [ako typ_premennej][,...]]
Sub Príklad_Static
Dim iCount ako celé číslo, iResult ako celé číslo
For iCount = 0 to 2
iResult = InitVar()
Next iCount
MsgBox iResult,0,"Odpoveď je"
End Sub
REM Funkcia na inicializovanie statickej premennej
Function InitVar(10) ako typ Integer
Static iInit ako typ Integer
Const iMinimum ako celé číslo = 40 REM minimum návratná hodnota tejto funkcie
ak iInit = 0 then REM skontrolujte, či je inicializovaný
iInit = iMinimum
else
iInit = iInit + 1
end if
InitVar = iInit
End Funkcia