un'altra domanda, dopo aver gestito la comunicazione da quel thread è il caso di chiudere sia socket che thread? per bypassare il fatto del blocco nel while ho fatto questo:


Private Sub RicezioneIP_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles RicIP.Tick
While Listener.Pending
Dim soketforclient As Socket = Me.Listener.AcceptSocket
ClientIP(soketClient)
End While
end sub

non è molto bello vero?