定义VBA静态变量导致编译器错误

Question

根据Microsoft：https://msdn.microsoft.com/en-us/library/z2cty7t8(v=vs.100).aspx以下静态变量声明是正确的。

Public Sub MyProc() 
    static count as integer = 0 
    count = count + 1 
End Sub 

根据Word 2010 VBA，这是一个编译器错误。它想要：

Public Sub MyProc2() 
    static count as integer 
    count = count + 1 
End Sub 

您必须假定静态计数已初始化为零。

希望这可以帮助别人。

Answer 1

您问题中的链接是指VB.NET，而不是VBA。 VBA需要第二个示例中的语法。

正确的链接是Visual Basic for Applications Reference – Static Statement。其语法如下：

Static varname [（[subscripts]）] [As [New] type] [，varname [（[subscripts]）] [As [New] type]]。 。 。

正如你所见，VBA不允许在声明静态变量的同一语句中赋值。

Answer 2

谢谢你，Word VBA 2010编译器喜欢这种语法。我更喜欢我的静态变量被定义，而不是留给编译器的奇想。

静态计数为整数：计数= 1