[求助]VBA中静态变量声明失效？

sody

6楼的办法与是否定义static变量没有任何关系

难道VBA中的static没有任何作用？

iq0050

变量的作用域的问题.

你在主函数里声明静态变量,其做用域仅为主函数内有效.静态变量只是不在该函数中时,内存中仍有该变量的空间保存其值,只是能全局存其值,并非能全局用其值,想用必须通过函数传递.子函数中引用的变量虽然变量名相同,但其为一个新变量,并非主函数静态变量的引用.做为新变量,根据VB的内定规则,其为空值.

你在模块上方声明 Option Explicit 要求强制变量声明就会明白是怎么回事了.

jkbanana

Public cn

Public cn
Sub n()
Static cn  '在该过程中又重新定义了一个叫cn的变量,在该过程中它将优先被使用.(变量名冲突)
kl= 111
cn = kl    '对该过程重新定义的cn赋值,而不是给Public cn赋值,所以Public cn依然为空.

Call m()
End Sub
Sub m()
Dim ss
ss = cn
End Sub