以文本方式查看主题 - Foxtable(狐表) (http://foxtable.net/bbs/index.asp) -- 专家坐堂 (http://foxtable.net/bbs/list.asp?boardid=2) ---- 如何清空串口缓存信息? (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=69810) |
-- 作者:54292550 -- 发布时间:2015/6/11 11:19:00 -- 如何清空串口缓存信息? 串口缓存信息如何清除? 怎样用代码实现? 串口发送数据1ms一次,狐表这边处理不了。
|
-- 作者:大红袍 -- 发布时间:2015/6/11 11:21:00 -- 串口基础看完了吗?
http://www.foxtable.com/help/topics/1966.htm
|
-- 作者:54292550 -- 发布时间:2015/6/11 12:07:00 -- 下位机给通过串口给狐表发送数据,发送频率1000Hz,接收出现问题,报错。 用串口调试助手给狐表发送数据,都没有问题。找了找原因,可能就是串口调试助手达不到下位机那么高的发送频率。 这个有什么办法解决?
|
-- 作者:大红袍 -- 发布时间:2015/6/11 12:27:00 -- 具体是报什么错?
http://www.foxtable.com/help/topics/1976.htm
|
-- 作者:54292550 -- 发布时间:2015/6/11 13:12:00 -- 此主题相关图片如下:报错.jpg |
-- 作者:54292550 -- 发布时间:2015/6/11 13:39:00 -- 用串口调试助手最高的频率发送都没问题。。。一用下位机发就有问题。 |
-- 作者:大红袍 -- 发布时间:2015/6/11 14:11:00 -- 贴出代码。 |
-- 作者:54292550 -- 发布时间:2015/6/12 9:16:00 -- 例如:JKQ1=|21.30000|24.300000|4.5700000|10.600000 datareceived事件代码: Dim CK As String = e.Port.ReadLine() ;;;;;;;;;;;///(用ReadExisting试了一下,还不如ReadLine的效果呢。) Dim Values() As String = CK.split("|") Dim v1 As String = Values(1) Dim v2 As String= Values(2) Dim v3 As String= Values(3) Dim v4 As String= Values(4) Forms("主窗口").Controls("Label6").Text = v1 Forms("主窗口").Controls("Label7").Text = v2 Forms("主窗口").Controls("Label8").Text = v3 Forms("主窗口").Controls("Label10").Text = v4
|
-- 作者:大红袍 -- 发布时间:2015/6/12 9:22:00 -- Dim CK As String = e.Port.ReadLine() ;;;;;;;;;;;///(用ReadExisting试了一下,还不如ReadLine的效果呢.) Dim Values() As String = CK.split("|") output.show(values.length) If values.Length >= 5 Then Dim v1 As String = Values(1) Dim v2 As String= Values(2) Dim v3 As String= Values(3) Dim v4 As String= Values(4) Forms("主窗口").Controls("Label6").Text = v1 Forms("主窗口").Controls("Label7").Text = v2 Forms("主窗口").Controls("Label8").Text = v3 Forms("主窗口").Controls("Label10").Text = v4 End If |