VB.NETTCP多客户端编程.docVIP

使用到TcpListen类 Imports System.Net.Sockets 使用到StreamWriter类 Imports System.IO 使用IPAddress类、IPHostEntry类等 Imports System.Net Public Class MyClient Implements IDisposable #Region 自定义变量 远程服务器IP地址 Private ServerIP As IPAddress 远程服务器端口号码 Private PortNum As Integer = 0 创建发送数据的网络基础数据流 Private SocketStream As NetworkStream 用以向网络基础数据流传送数据 Private Writer As BinaryWriter 用以向网络基础数据流获得数据 Private Reader As BinaryReader 定义一个客户端对象 Private Client As TcpClient 客户名称 Private clientName As String 执行状态消息以显示于窗体 Public Event OnText(ByVal msg As String)