主题：[求助]串口传输问题

Dim cnt As Integer = e.Port.BytesToRead
Output.show(cnt)
Dim Val(cnt - 1) As Byte

e.Port.Read(val,0,cnt)

Dim str As String = ""
For Each s As Byte In val
    str &= s & ","
Next
output.show(str)