>9
Winsock( i ).SendData "test"
の後にDoEventsいれたら?