socket接受字符串

socket接受字符串后，在字符串后面加上字符串无法拼接，加载前面可以：    Private Sub tragett()
        Label3.Text = "已经建立连接准备接受数据"
        Dim bytes(500) As Byte
        Dim rev As Int32
        While (True)
            rev = clientsocket.Receive(bytes, bytes.Length, 0)  '将数据从连接的   Socket   接收到接收缓冲区的特定位置。
            If rev <= 0 Then
                Exit While
            End If
            strev = strev + System.Text.Encoding.GetEncoding("GBK").GetString(bytes)
            TextBox3.Text = strev''这里无法拼接字符串
            strev = strev.Substring(72)+“20130529”+“AHU01”‘’这样可以
          strev = “20130529”+“AHU01”+strev.Substring(72)‘’把字符串放到textbox里面再拿出来也可以
          strev=TextBox3.Text+“20130529”+“AHU01”            If getxmlnodes(strev) = True Then
                clientsocket.Close()
                thread1.Abort()
            End If
        End While    End Sub