- Foxtable(狐表) (http://foxtable.com/bbs/index.asp)
-- 专家坐堂 (http://foxtable.com/bbs/list.asp?boardid=2)
---- 如何清空串口缓存信息？ (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=69810)
-- 发布时间：2015/6/11 11:19:00
-- 如何清空串口缓存信息？
串口缓存信息如何清除？
怎样用代码实现？
串口发送数据1ms一次，狐表这边处理不了。
-- 发布时间：2015/6/11 11:21:00
--
串口基础看完了吗？
http://www.foxtable.com/help/topics/1966.htm
-- 发布时间：2015/6/11 12:07:00
--
下位机给通过串口给狐表发送数据，发送频率1000Hz，接收出现问题，报错。
用串口调试助手给狐表发送数据，都没有问题。找了找原因，可能就是串口调试助手达不到下位机那么高的发送频率。
这个有什么办法解决？
-- 发布时间：2015/6/11 12:27:00
--
具体是报什么错？
http://www.foxtable.com/help/topics/1976.htm
-- 发布时间：2015/6/11 13:12:00
--
此主题相关图片如下：报错.jpg
-- 发布时间：2015/6/11 13:39:00
--
用串口调试助手最高的频率发送都没问题。。。一用下位机发就有问题。
-- 发布时间：2015/6/11 14:11:00
--
贴出代码。
-- 发布时间：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