VB网络通信调试软件(6)
客户端和服务端的程序可以在一个程序中完成，根据用户的选择可以实现功能的转换，这样的转换需要控件和代码完成，选择中间变量会使编程更清晰。
建立连接后，任何一方计算机都可以收发数据。为了发送数据，可调用 SendData 方法。当接收数据时会发生 DataArrival 事件。调用 DataArrival 事件内的 GetData 方法就可获取数据。
3.1初步实现服务器和客户端的通信
新建工程将其缺省窗体命名为“frmClient”；将窗体的标题改为“客户端测试”。在窗体中添加一个 WinSock 控件。在窗体中添加4个TextBox 控件。默认其命名为txtServerIP、txtListen、txtReceive、txtSend，并将其内容清空；将txtReceive和txtSend的MultiLine属性设置为True，ScrollBars属性设置为2-Vertical。在窗体中添加5个CommandButton控件，并将它们的Caption属性分别修改为“连接”、“断开”、“发送”、“清空”。在窗体上放2个Label 控件，其命名默认为Label1、Label2，并将它们的Caption属性修改为“服务器IP：”、“端口号：”