问题为：有时候会取不到串口发送来的数据串口监视代码：
If Forms("称重打标").Opened Then
Forms("称重打标").Controls("显示数据").value = e.Port.ReadExisting().ToString().Trim().Replace("w", "").Replace("k", "").Replace(vbCrLf, "").Replace("g", "")
Threading.Thread.Sleep(500)
end if
称重打标窗口内按钮事件:
Ports(com1.Value).Write("R")
Dim 显示数据 As WinForm.TextBox = e.Form.Controls("显示数据")
If 显示数据.Value = "" Then
msg("未接收到串口发来的数据，请重试.")
Return
End If
--其中，Threading.Thread.Sleep(500)这个如果取消，会报错。。
加好友 
发短信
Post By：2021/10/22 9:21:00 [只看该作者]
