Public Dispatcher           As IDispatcher

Public MsgManagerAddress    As String

Private Risultati           As Collection

Private Sub Class_Initialize()

Private Function ClsTestProcedures_BigConcatena(a As String, b As String, c As String, d As String, e As String, f As String, g As String, h As String, i As String, l As String, m As String, n As String) As Variant

Private Function ClsTestProcedures_ComputeDiff(Sottraendo As Long, Sottraente As Long) As Long

Private Sub ClsTestProcedures_ComputeSum(Addendo1 As Long, Addendo2 As Long)

Private Function ClsTestProcedures_Concatena(Str1 As String, Str2 As String, Str3 As String) As String

Private Function ClsTestProcedures_Divide(Arg1 As Long, Arg2 As Long) As Long

Private Function ClsTestProcedures_GetSum(Addendo1 As Long, Addendo2 As Long) As Long

Private Sub ClsTestProcedures_hello()

Private Function IReceiver_getObjectID() As String

Private Sub IReceiver_msgArrived(Env As SMom.CEnvelope)

Private Function ISender_getObjectID() As String

Private Function IsResultArrived(InstanceID As String) As CFunctionResult

Private Sub ResultArrived(Result As CFunctionResult)