使用TCP或UDP套接字的VB 2008在线聊天应用程序

Question

我想开发一个服务器/客户端模型的聊天应用程序，在VISUAL BASIC 2008中打开TCP或UDP套接字。是否有我可以下载的工作示例，代码来帮助我完成这个项目？

在此先感谢。

---

编辑：谢谢你的回答，真的很感激。但是im stack在某处，因为我的应用程序只能在本地使用，而不能在整个Internet上使用。

我的服务器上的部分代码如下：

在此处输入代码READDATA = “Conected聊天服务器...” LabelConnection.Text = “已连接” PictureBox1.Image = My.Resources.Globe_Connected_Icon_39x33 PictureBox1。 BackColor = Color.Transparent msg（）clientSocket.Connect（“127.0.0.1”，8888）在这里输入代码

现在，而不是127.0.0.1我应该把一些变量或东西，保持目标机器的IP地址？我会怎么做？谁能帮忙？

Answer 1

本质上，您需要构建聊天服务器应用程序和连接到服务器并启动数据交换的客户端程序。要真正做到这一点，你还需要学习一些关于线程的知识，这样你的客户/侦听器才能异步运行。

这里的样本项目的列表看看：

• Wintalk（微软提供的样品引进的WinForms，插座，和.NET Framework）

• Creating a Multi-User TCP Chat Application

• A TCP/IP Chat Program

• Simple Chat Application Using .NET Sockets

• A Chat Application Using Asynchronous TCP Sockets

• TCP/IP Chat Application Using C#

• VB.NET Sockets Client Class

你可能会发现，是用C＃（如几个以上样本）

任何事情应该是比较简单的转换为VB.NET。如果您需要一些额外的指导，请尝试一些可用的在线转换工具，例如DeveloperFusion提供的工具。

最后，System.Net.Sockets命名空间（您将广泛使用）的MSDN documentation是一个很好的资源，因为您将开始深入研究示例项目并发现自己遇到了一些唠叨的问题。