Static Statement

在子例程或函数中声明过程级别的变量或数组,以便在退出子例程或函数后,能够保留这些变量或数组的值。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