TCP verzend niet gehele string

[w00tare]

Hallo,

Ik probeer via een Server & Client wat text te verzenden. Dit staat in een ListView. Dit is mijn code:

For Each lvi As ListViewItem In ListView1.SelectedItems
            Dim TCP As New TcpClient()
            TCP.Connect("127.0.0.1", 8002)
            Dim networkStream As NetworkStream = TCP.GetStream()
            If networkStream.CanWrite And networkStream.CanRead Then
                Dim str As String = String.Format("{0}|{1}", lvi.SubItems(1).Text.ToString, "Text")
                Dim sendBytes As [Byte]() = Encoding.ASCII.GetBytes(str)
                networkStream.Write(sendBytes, 0, sendBytes.Length)
            End If
        Next

Maar hij verzend alleen de text van de subitem van de listview. Hoe kan dit? Als ik Het zo doe:

Dim str as string = "1|2"

dan doet hij het wel. (Geprobeerd).

Bedankt.