Dim tcpClient As New System.Net.Sockets.TcpClient()
        tcpClient.Connect("192.168.1.170", 10001)

    Using tcpClient As New System.Net.Sockets.TcpClient()
        tcpClient.Connect("192.168.1.170", 10001)
        Using s As System.Net.Sockets.NetworkStream = tcpClient.GetStream()
            s.Write(arrByte, 0, arrByte.Length) 'Senden
        End Using 'Verbindung schließen
    End Using

Dim arrByte As Byte() = { &H0, &H0, ... }