本程序很简单，分为客户端和服务端两个部分

服务端的代码如下(服务器的IP是192.100.100.222):
Private Sub Form_Load()
tcpserver.LocalPort = 3333
tcpserver.Listen
End Sub客户端的代码如下：
Private Sub Form_Load()
tcpclient.Protocol = sckTCPProtocol
tcpclient.LocalPort = 3333
tcpclient.RemotePort = 3334
tcpclient.RemoteHost = "192.100.100.222"
End Sub
然后客户端的form上面有一个按纽,其click事件的代码如下:
tcpclient.Connect
tcpclient.SendData "111"先运行服务端，再运行客户端，按下客户端上的click按纽，报错提示地址已经被使用 求各位达人帮忙看看