I ran into this problem a long time ago, what you need to do is throw in a DoEvents call in the place where your server is handling the incomming and outgoing traffic. I haven't made anything like that for awhile, but I'm pretty sure you do it in your loops, like:
example:
for each.. blah blah
Winsock1.SendData blah
DoEvents
end for