Custom control, Control Array... HELP!

Hi, I downloaded the source code for a Winsock based ActiveX control. The control has a debug event that returns info about client to server communication.

The problem is that when I create a control array Index in events always returns the last control in the index. When I call my sub ConnectToTheServer.. all I get in Debug is [1] connecting , [1] this and [1] that...

Private Sub ConnectToTheServer()
TheCtl(0).connect
TheCtl(1).connect
End Sub

Private Sub TheCtl_DebugOut(Index As Integer, DebugTxt As String)
debug.print "[" & Index & "] " & DebugTxt
End Sub

I have the source for the ActiveX control so could fix it my self but don't know what to look for ... any help.. I think something to do with Publics and Privates but I thought they could not reach each other accross instances of a control..

Thanks

Dave C