Dim result As StringBuilder 'holds the response, when server stop sending, will parsed by XML obj
Sub AStreams_NewData (Buffer() As Byte)
Dim ReceivedSTR As String
ReceivedSTR=BytesToString(Buffer,0,Buffer.Length,"UTF8")
result.Append(ReceivedSTR) //exception here