How to get string without code ascii - vb.net

Question

About above picture I set the first variable in machine with word "hello"
(SerialPort.Write())
02 "0A" 14 "01hello" 03
Image *
Then I request the first variable in machine (SerialPort.ReadExisting())
02 "0B01" 03
Image *
The output is
૯୫1A૯୫01hello૯୫૯୫2A૯୫01hello૯୫ ૯୫3A૯୫01hello૯୫ ....
If I click the button request, number before A, always change and sequence until the number 9
How to get string desired result is just hello?
* I cannot post the picture because I need at least 10 reputation to post image.
Some code I use
Private Sub readMemoryButton_Click(sender As Object, e As EventArgs) Handles readMemoryButton.Click
'copy
'Received.AppendText("TX" & vbCrLf) ' Switch to a new line after every transmission
'SpaceCount = 0
Dim TextString As String
Dim TXArray(2047) As Byte
Dim I As Integer
Dim J As Integer = 0
Dim Ascii As Boolean = False
Dim Quote As Boolean = False
Dim Temp As Boolean
Dim Second As Boolean = False
Dim TXByte As Byte = 0
Dim CharByte As Byte
If COMPort.IsOpen Then
TextString = Received.Text
For I = 0 To TextString.Length - 1
CharByte = Asc(TextString.Chars(I))
If CharByte = 34 Then ' If " Then
Temp = Ascii
Ascii = Ascii Or Quote
Quote = Not (Temp And Quote)
Else
Ascii = Ascii Xor Quote
Quote = False
End If
If Not Quote Then
If Ascii Then
TXArray(J) = CharByte
J = J + 1
Else
If (CharByte <> 32) And (CharByte <> 10) And (CharByte <> 13) Then ' Skip spaces, LF and CR
CharByte = (CharByte - 48) And 31 ' And 31 makes it case insensitive
If CharByte > 16 Then
CharByte = CharByte - 7
End If
If Second Then
TXArray(J) = TXByte + CharByte
Second = False
J = J + 1
Else
TXByte = CharByte << 4
Second = True
End If
End If
End If
End If
Next
Try
COMPort.Write(TXArray, 0, J)
Dim vLabelMemory As String = COMPort.ReadExisting()
labelMemory.Text = vLabelMemory
Catch ex As Exception
MsgBox(ex.Message & " Check CTS signal or set Flow Control to None.")
End Try
Else
MsgBox("COM port is closed. Please select a COM port")
End If
End Sub