下面用一些例子来说明这个问题。 复制代码 代码如下: Option Explicit Sub foo() Dim var var="hello,world!" MsgBox var End Sub Call foo()
下面的代码跟上面的代码等效,但是var的定义放在了函数的最后: 复制代码 代码如下: Option Explicit Sub foo() var="hello,world!" MsgBox var Dim var End Sub Call foo()
下面的例子说明变量不管在哪定义,在整个函数中都是可以使用的,当然如果把定义的位置放的特殊一点有利于代码的清晰,阅读起来比较方便,修改时也比较方便。 复制代码 代码如下: Option Explicit Sub foo() Dim var1 var1="YES" MsgBox "var1: "&var1&vbCrLf&"var2: "&var2 IF var1="YES" Then Dim var2 var2="NO" End IF MsgBox "var1: "&var1&vbCrLf&"var2: "&var2 End Sub Call foo()