ִһڽűȫֿռָ䡣

ExecuteGlobal statement 
statement һһִַʽstatement п԰, ʹðŽֿ

˵
 VBScript , x = y ֽͷһַΪһֵ,  y ֵ xڶַΪһʽڲ x  y Ƿֵͬ,Ϊ True; ǲ,Ϊ False.ExecuteGlobal ʹõһַ, Eval ʹõڶַ

ע    Microsoft? JScript? , ֵȽ֮䲻ڻΪֵ(=) ͬڱȽ
ڽűȫֿռУExecuteGlobal е䶼ǿִеġˣӵУԱκιܹзʡ,һ VBScript Class ʱִС֮һʵ

ʱӹ̺Ƿǳõ,ҲܵʱеȫֱͺΪܵ·ǳصĳ,ˣʹ ExecuteGlobal ʱһ÷ǳʹ֮ı,ʹExecute 䣬ΪֻӰֿռ䡣

ӽ ExecuteGlobal ÷

Dim X         '  X Ϊȫֱ
X = "Global"      ' ȫֱ X ֵ
Sub Proc1   ' ̡
  Dim X      ' ھֲ X
  X = "Local"   ' ֲ X ֵ
         ' ˴Ŀִ
         ' һ, ʱ, ӡ X
         ' ˴ӡȫֱ X ֵΪ Proc2
         ' ̳ȫֱеһС
  ExecuteGlobal "Sub Proc2: ӡ X: End Sub"
  Print Eval("X")   ' ӡֲ X
  Proc2      ' ȫе Proc2 
             ' ӡ "Global" 
End Sub
Proc2        ' н´ 
             ' Ϊ Proc2  Proc1 ֮ǲõġ
Proc1         '  Proc1
  Execute "Sub Proc2: ӡ X: End Sub"
Proc2         ' еóɹΪ Proc2
         ' ȫǿõġ
ʾ ExecuteGlobal Աд轫̶ñ֮ڡ

S = "Sub Proc2" & vbCrLf
S = S & "  Print X" & vbCrLf 
S = S & "End Sub"
ExecuteGlobal S
Ҫ
汾 1
