说明: 类似QQ的聊天软件(VB.NET) 部分代码: Private Sub EstablishConnection() ToolStripStatusLabel1.Text = "正在连接到服务器" serveraddress = ServerIP.Text '服务器IP地址 Try clientsocket = New TcpClient(serveraddress, serverport) ns = clientsocket.GetStream() sr = New StreamReader(
<qq_16891459> 上传 | 大小:58kb