IBM Lotus Symphony
|
Declara una variable o una matriz a nivel de procedimiento dentro de una subrutina o función, de manera que los valores de la variable o matriz se conservan incluso después de salir de la subrutina o función. Las convenciones de la instrucción Dim también son válidas.
![]() |
La instrucción Static no se puede utilizar para definir las matrices de variables. Las matrices deben especificarse de acuerdo con un tamaño fijo. |
Static NombreVar[(inicio To final)] [As TipoVar], NombreVar2[(inicio To final)] [As TipoVar], ...
Sub EjemploStatic
Dim iCount as Integer, iResult as Integer
For iCount = 0 to 2
iResult = InitVar()
Next iContador
MsgBox iResult,0,"La respuesta es"
End Sub
REM Función para la inicialización de la variable estática
Function InitVar() As Integer
Static iInit As Integer
Const iMinimum as Integer = 40 REM valor de retorno mínimo de esta función
if iInit = 0 then REM comprobar si se inicializa
iInit = iMinimum
else
iInit = iInit + 1
end if
InitVar = iInit
End Function