平时在VB里使用TCP通信的时候都是用Winsock控件，但是什么时候都拖着一个大ocx不爽，又不是每台机子都有这个控件，所以用API来完成就是最理想的方法。看了一份文档，然后附赠了一份代码，这个代码很好，思路清晰，代码完整，看起来相当舒服明了，发出来。

纯API实现TCP通信完成点对点聊天(VB)