[求助]求助：Socket 客户端连接服务端 - 专家坐堂 - Foxtable(狐表) - 新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!

Socket 客户端连接服务端，没问题。问题：当通讯一方中断，会出现闪退和死掉不动的情况。下面代码是启动监听的界面，请问我该如何新建一个ServerSocket?

能否给我一个完整代码，找了很长时间，每个帖子都是解决某一个问题，但又会带来新的问题，拼凑在一起也不行。个人能力确实不太够。谢谢！！

Dim lab1 As WinForm.Label = e.Form.Controls("Label1")

'Dim ServerSocket As New System.Net.Sockets.Socket(System.Net.Sockets.AddressFamily.InterNetwork, System.Net.Sockets.SocketType.Stream, System.Net.Sockets.ProtocolType.Tcp)

Dim listener 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.131"), 8080)

If ServerSocket Is Nothing Then

Dim ServerSocket As New System.Net.Sockets.Socket(System.Net.Sockets.AddressFamily.InterNetwork, System.Net.Sockets.SocketType.Stream, System.Net.Sockets.ProtocolType.Tcp)

End If

'If listener.Close Is True Then

' listener.

'End If

If Vars("lianjie") = False Then

ServerThread = New System.Threading.Thread(AddressOf Listen)

ServerThread.Start()

lab1.Text = "监听装态：" & "已经开始监听8080端口"

Else

lab1.Text = "监听装态：" & "已经开始监听8080端口"

End If

主题：[求助]求助：Socket 客户端连接服务端