Android Question Use Astream_NewData

[wolfray1972]

Hi all,

I use a barcode scanner, and use:

Sresult = BytesToString(Buffer, 0, Buffer.Length, "UTF8")

This gives me a Chr(13) at the end of my scan result. How to remove??

I tried replace(chr(13),""), but to no avail.

Any one has an idea?

 

[Erel]

Dim len As Int = Buffer.Length
If Buffer(Buffer.Length - 1) = 13 Then len = len - 1
Sresult = BytesToString(Buffer, 0, len, "UTF8")

 

[wolfray1972]

Wow that was fast. Could you explain:
Buffer(Buffer.Length - 1) = 13 Then len = len - 1

It works but i would like to know why and what is it doing?

Thank you in advance.

 

[DonManfred]

Buffer(Buffer.Length - 1) = 13

if the last character in Buffer is a chr(13) then.....

 

[wolfray1972]

Ah..understand now. Thank you for this fast fix. All working as it should now. Me Happy