Static 语句

在子例程或函数中声明过程级别的变量或数组，以便在退出子例程或函数后，能够保留这些变量或数组的值。Dim 语句的规范也仍然有效。

「Static 语句」不能用于定义可变大小的数组，而只能用于定义固定大小的数组。

语法:


Static VarName[(start To end)] [As VarType], VarName2[(start To end)] [As VarType], ...

示例:


Sub ExampleStatic
Dim iCount As Integer, iResult As Integer
    For iCount = 0 To 2
        iResult = InitVar()
    Next iCount
    MsgBox iResult,0,"The answer is"
End Sub
 
' 用于静态变量初始化的函数
Function InitVar() As Integer
    Static iInit As Integer
    Const iMinimum As Integer = 40 ' 该函数返回的最小值
    If iInit = 0 Then ' 检查是否已经初始化
        iInit = iMinimum
    Else
        iInit = iInit + 1
    End If
    InitVar = iInit
End Function