I am trying to make a chat program w/ winsock in VB 5.0 EE.

Can someone please send me an example, or tell me where to get one, I can't ever seem to get anything with winsock working.