' Listing 2. Code That Makes Foo Available to Calls Outside AnotherProc's Scope

buf = "Hello"
AnotherProc
Foo

Sub AnotherProc
	Dim procCode
	procCode = "Sub Foo: MsgBox buf: End Sub"
	ExecuteGlobal procCode
	Foo
End Sub