Although I do not have a form I added the component as requested. (I don't understand why, BUT... you da man so I'll listen )

In the General/Declarations I added:

Dim WithEvents obj as WinSock

then when I am about to set it up to listen I am setting the object via:

Set obj = New Winsock.

** note that after "New" Winsock does NOT appear in the drop down.

During compile I get this error:

==Compile Error==
Invalid use of NEW keyword.

this appears and VB highlighted "New Winsock"

hmmmm... I do appreciate the go tho