对方发过来的是字节还是字符?ReadExisting只能接收字符。
If Forms("称重打标").Opened Then
dim s as string = e.Port.ReadExisting()
msgbox(s.length) 使用日志记录一下接收的数据长度,是不会有隐藏的字符
Forms("称重打标").Controls("显示数据").value = s.ToString().Trim().Replace("w", "").Replace("k", "").Replace(vbCrLf, "").Replace("g", "")
Threading.Thread.Sleep(500)
end if
另外确定对方发送成功了?是不是需要什么交互过程,比如先应答再接收