'Class module
Sub Class_Globals
Dim wMod As Object
Dim wSub As String
End Sub
'Initializes the object. You can add parameters to this method if needed.
Public Sub Initialize(xMod As Object, xSub As String)
wMod = xMod
wSub = xSub
End Sub
Sub sum(a As Int, b As Int)
CallSub(wMod,wSub)
Log("1")
CallSub(wMod,wSub)
Log("2")
CallSubDelayed(wMod,wSub)
Log("3")
CallSubDelayed(wMod,wSub)
Log("4")
Return a+b
End Sub