'我没有做服务器端,你自己测试一下 Dim Skt As New System.Net.Sockets.Socket(System.Net.Sockets.AddressFamily.InterNetwork, System.Net.Sockets.SocketType.Stream, System.Net.Sockets.ProtocolType.Tcp) Dim LocalEndPoint As New System.Net.IPEndPoint(System.Net.IPAddress.Parse("192.168.1.100"), 8000) Skt.Connect(localEndPoint) Skt.Send(Encoding.Unicode.GetBytes("1234567890")) Skt.Close()