Module
Contents
Index 🔎︎

# 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