怎么在VB里建立客户端程序Client和服务器端程序systry

在VB中加载WinSock控件，1、客户端发送一串数据给服务器，服务器进行处理2、服务器处理结果在发送给客户端3、客户端根据服务器处理结果进行相应的操作需要两个程序：服务器端、客户端

只有在winsock_connectionrequest过程结束后vb才会执行senddata时间的，这样不能够实现，

要达到时间上的同步并不是说没一秒都要进行一次时间的发送的！

你可以只在刚连接服务器的时候进行一次时间数据的发送，客户端在接收到时间后赋值给文本框，之后让一个interval为1000ms的timer可用，每一个timer时间更改一下文本框的时间值即可。

当然如果你要每秒钟都像客户端发送时间的话，你可以在服务器端添加一个interval为1000ms的timer,在与客户端建立连接后使该timer可用，该timer的时间中就是让winsock控件发送时间，然后客户端每次收到数据后更新文本框。不过这样太麻烦，也太浪费网络资源了！

================================

补充：要想在客户端同时显示服务器的时间和客户端的时间在客户端添加一个文本框，每次触发timer时间时就将当前时间赋值给文本框就可以了。

重复使用同一个套接字绑定的端口IP组合了。往往提示这个是你实例化的时候出的问题，看你函数定义的名字，大概你是想封装起来调用，每次收到新连接然后直接调用TCPlisten()得到连接然后回调处理吧。如果是我说的这种情况，那么你函数不能这么写，因为new就代表你每次调用这个函数就对这个全局对象进行了一次实例化操作，而且还是针对同一个套接字IP端口组合进行，就会报错，因为你一开始监听但没有结束并释放它的话，这个是一直保持占用的。如果想直接每次监听就直接用TCPlisten()，那么你需要把listener的实例化从这个函数中提取出来，单独做初始化对象处理。更何况你指的是多客户端。

---