fix: correct length

Author: CCXXXI

TcpClient.vb

@@ -41,8 +41,8 @@ Public Class TcpClient
     Public Function Report() As Boolean
         _networkStream.Write(_report, 0, _report.Length)
 
-        Dim bytes(_tcpClient.ReceiveBufferSize) As Byte
-        _networkStream.Read(bytes, 0, CInt(_tcpClient.ReceiveBufferSize))
+        Dim bytes(_expectResponse.Length) As Byte
+        _networkStream.Read(bytes, 0, CInt(_expectResponse.Length))
 
         Return bytes.SequenceEqual(_expectResponse)
     End Function