IBM Lotus Symphony
|
Erklærer en variabel eller en matrix på procedureniveau i en underrutine eller en funktion, så variablens eller matrixens værdier bevares, efter at underrutinen eller funktionen er afsluttet. Reglerne for Dim-sætninger er også gyldige.
![]() |
Sætningen Static kan ikke benyttes til at definere variable matrixer. Matrixer skal angives med en fast størrelse. |
Static VarNavn[(Start To Slut)] [As VarType], VarNavn2[(Start To Slut)] [As VarType], ...
Sub EksempelStatic
Dim iAntal as Integer, iResultat as Integer
For iAntal = 0 to 2
iResultat = InitVar()
Next iAntal
MsgBox iResultat,0,"Svaret er"
End Sub
REM Funktion til initialisering af den statiske variabel
Function InitVar() As Integer
Static iInit As Integer
Const iMinimum as Integer = 40 REM laveste returværdi for denne funktion
if iInit = 0 then REM kontrollér, om initialiseret
iInit = iMinimum
else
iInit = iInit + 1
End If
InitVar = iInit
End Function