16,556
社区成员
发帖
与我相关
我的任务
分享
Tx1_Sp.DiscardInBuffer() '清空接收缓冲
Tx1_Sp.Write(Fs_Bytes, 0, Fs_Bytes.Length)
Do
System.Windows.Forms.Application.DoEvents() '释放控制
Loop Until Tx1_Sp.BytesToWrite = 0 '等待发送完
'3.5个字符延时
System.Windows.Forms.Application.DoEvents()
System.Threading.Thread.Sleep(65 + Int(1 / Single.Parse(Kjx.TX1_BaudRate) * 11 * 3.5 * 1000))