#codice del server

Imports System.Net.Sockets
Imports System.Text


Public Class Server
Inherits System.Windows.Forms.Form

#Region " Windows Form Designer generated code "
#End Region

Const PORT_NUM As Integer = 10000
Const READ_BUFFER_SIZE As Integer = 255

Private client As TcpClient
Private server As TcpListener
Private server_dati As Threading.Thread

Private Sub avvia_server_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles avvia_server.Click
server = New TcpListener(PORT_NUM)
server.Start()
comandi_box.Text = "Server Avviato"
End Sub

Private Sub Server_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
Try
client = server.AcceptTcpClient()
comandi_box.Text = "Connessione accettata."
Catch ex As Exception
End Try
End Sub

Private Sub spegni_server_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles spegni_server.Click
server.Stop()
comandi_box.Text = "Server Disattivato"
End Sub
End Class

#codice del client

Imports System.Net.Sockets
Imports System.Text

Public Class Client
Inherits System.Windows.Forms.Form

#Region " Windows Form Designer generated code "
#End Region

Const READ_BUFFER_SIZE As Integer = 255
Const PORT_NUM As Integer = 10000

Private client As TcpClient
Private readBuffer(READ_BUFFER_SIZE) As Byte

Private Sub SendData(ByVal data As String)
Dim writer As New IO.StreamWriter(client.GetStream)
writer.Write(data & vbCr)
writer.Flush()
End Sub

Private Sub connessione_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles connessione.Click
client = New TcpClient("localhost", PORT_NUM)
End Sub

Private Sub invia_comando_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles invia_comando.Click
SendData(command_box.Text)
End Sub

Private Sub disconnessione_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles disconnessione.Click
client.Close()
End Sub
End Class

Allora il server funziona, si apre la porta 10000 e si mette in ascolto, il client si connette, riesce ad inviare il messaggio presente nella textbox.

Quello che non riesco a fare e ricevere il messaggio inviato dal client nella texbox del server.
Mi dite come si fà? :master:

Le ho provate tutte ma non ne vengo fuori.