VB.NET聊天系统

Question

我做了一个简单的聊天系统，一对一连接到一个客户端的服务器。我不确定如何让服务器上的多个客户端，以便您可以看到每个人的消息。 Here is the source code。服务器一次只接受一个客户端。我怎样才能解决这个问题？

感谢，

凯文

Answer 1

与您迄今所做的一切相一致，这里有一些提示，让你开始。首先，当客户端收到一个连接时，它会停止监听新的连接。

TCPL.Start() 
TCPL.BeginAcceptTcpClient(AddressOf OnConnect, Nothing) 

一个客户端连接后调用这两行将允许另一个客户端连接。其次，客户端不应该负责启动服务器。通过这样做，每个客户端都拥有自己的服务器。当客户端拥有自己的服务器时，客户端永远无法发送显示在其他客户端上的消息。第三，我会将server.vb移到它自己的项目中。这样两个不耦合。这些步骤将允许服务器接受多个客户端。此时多个客户端将能够连接并且服务器将看到来自每个客户端的消息，但客户端将无法看到彼此的消息。我会离开最后的障碍。