non ci sono problemi..allora per collegarti(come Client) io ti consiglio di utilizzare le classi TcpClient(per la connessione) e networkstream(per lo scambio di dati)..quindi dichiara subito
codice:
 Dim client as new tcpclient
dim netstream as networkstream
per connetterti ad un host(es mail.tin.it) usa la seguente linea di codice
codice:
 tcpclient.Connect("mail.tin.it", 25)
        netstream = tcpclient.GetStream()
in questo modo il tuo pc si è connesso a mail.tin.it alla rispettiva porta 25 e ha avviato la lettura di scambio di dati.

ora ci sono 2 strade.. per la ricezione di dati puoi usare sia i Thread sia un timer. Con i thread il soft dovrebbe essere più efficiente; tuttavia è un pò + complesso l'approccio soprattutto se sei alle prime armi e visto che stiamo realizzando un semplice client un timer va benissimo.

detto questo..aggiungi alle linee di codice di sopra la seguente stringa
codice:
If tcpclient.Connected = True Then
            Timer1.Enabled = True
        End If
e nel tick del timer
codice:
Private Sub Timer1_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Timer1.Tick
        If netstream.DataAvailable = True Then
            Dim stringar As String
            Dim bytes(tcpclient.ReceiveBufferSize()) As Byte
            netstream.Read(bytes, 0, bytes.Length)

            stringar += System.Text.Encoding.ASCII.GetString(bytes)
            Textbox1.Text += stringar & vbCrLf
        End If
End Sub
in questo modo il nostro client riceverà soltanto quando ci saranno dati da ricevere(così da evitare eccezioni)

ora l'ultimo passo è l'invio di dati..niente di più semplice

codice:
   Dim bytes As Byte() = System.Text.Encoding.ASCII.GetBytes(Invia.Text & vbCrLf)
        netstream.Write(bytes, 0, bytes.Length)
        netstream.Flush()

spero di esserti stato d'aiuto..con questo codice puoi realzzare un applicazione simile al telnet di windows..Ciao e a presto