Function Msg1()
Execute "Public X : X=10"
ExecuteGlobal "Public Y : Y=10"
End Function
Function Msg2()
MsgBox X 'Returns empty
Msgbox Y 'Returns 10
End Function
Call Msg1
Call Msg2
...
Execute "Public X : X=10"
ExecuteGlobal "Public Y : Y=10"
End Function
Function Msg2()
MsgBox X 'Returns empty
Msgbox Y 'Returns 10
End Function
Call Msg1
Call Msg2
...
No comments:
Post a Comment