Прием данных Winsock и преобразование данных Byte в String - Visual Basic .NET

Формулировка задачи:

VB.NET Здравствуйте! Вопрос! Есть обьект winsock для обмена сообщениями tcp\ip. http://vbbook.ru/1403703567/winsock-v-visual-basicnet/ вот отсюда взял. Вставил клиент и серв в одну программу. Но вот проблема!

                    Листинг программы
                
    Private Sub tcp_DataArrival(sender As Object, e As AxMSWinsockLib.DMSWinsockControlEvents_DataArrivalEvent) Handles
tcp.DataArrival
 
        tcp.GetData(TextBox1.Text)
    End Sub

Этот↑ пример работает!

                    Листинг программы
                
    Private Sub tcp_DataArrival(sender As Object, e As AxMSWinsockLib.DMSWinsockControlEvents_DataArrivalEvent) Handles tcp.DataArrival
    dim data as string
        tcp.GetData(data)
    End Sub

А этот ↑ - нет, пишет, что тип byte невозможно преобразовать в тип string! Но как? если в первом примере textbox1.text тоже вроде выражается в string ` е Решил, но хочется напрямую, как во втором примере Решение:

                    Листинг программы
                
Private Sub tcp_DataArrival(sender As Object, e As AxMSWinsockLib.DMSWinsockControlEvents_DataArrivalEvent) Handles tcp.DataArrival
Dim data As New TextBox
tcp.GetData(data.Text)
    End Sub

Спасибо всем за ответы!

Решение задачи: «Прием данных Winsock и преобразование данных Byte в String»

textual
                            Листинг программы 
                        
Private Sub tcp_DataArrival(sender As Object, e As AxMSWinsockLib.DMSWinsockControlEvents_DataArrivalEvent) Handles tcp.DataArrival
    dim data as byte
        tcp.GetData(data)
        dim str as string = System.Text.Encoding.Default.GetString(data)
    End Sub