Coverting a string to an array of bytes

[Merri]

Well, the easiest to go with:

Dim Buffer() As Byte
Buffer = StrConv(MSComm1.Input, vbFromUnicode)
Debug.Print "First byte: " & Buffer(0) & " | Number of bytes: " & (UBound(Buffer) + 1)