在VBA(Visual Basic for Applications)中,你可以使用`Dim`关键字来定义一个静态变量。静态变量在模块级别定义后,即使函数或子程序结束,它的值也会保持不变。
以下是如何定义一个静态变量的示例:
```vba
Private Static myStaticVariable As Integer
Sub MySub()
' 使用静态变量
myStaticVariable = myStaticVariable + 1
MsgBox "静态变量的值是:" & myStaticVariable
End Sub
```
在这个例子中,`myStaticVariable`是一个静态变量,它在`MySub`子程序中定义。每次调用`MySub`时,`myStaticVariable`的值都会增加1,并且即使子程序结束,它的值也会保持不变。
请注意,静态变量仅在定义它的模块中是持久的。如果你在另一个模块中尝试访问它,你会得到一个错误,因为静态变量的作用域是它被定义的模块。