前不久，在某人的博客上看到这样的一道题。

Public Sub Test()

Dim i as Integer

For i=0 To 3

Dim A as Integer

A=A+1

Next

Debug.Print A

End Sub

问最后显示的A的值是多少？

答案是出乎意料的，显示是4

那人从分析内核的角度来分析这个问题。有兴趣的读者可以去看看。

我的理解是，那一句Dim A as Integer虽然在循环内，但其实只之行了一次。

我们把循环拆开，看看会有什么反应。

Public Sub Test()

Dim A as Integer

A=A+1

Dim A as Integer

A=A+1

Debug.Print A

End Sub

看看结果，立马会提示你“重复定义”

因此，总结一下。变量定义不管是否在循环内，在编译的时候都是只定义一次。

一个猜想：一个函数内的所有的变量定义都会在编译的时候提前至函数的开始处。

从这个角度来看，这道面试题的结果就不难理解了。