| 以文本方式查看主题 - Foxtable(狐表) (http://www.foxtable.com/bbs/index.asp) -- 专家坐堂 (http://www.foxtable.com/bbs/list.asp?boardid=2) ---- 我想问：2020年1月12日更新 的版本 目前稳定吗？ (http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&id=145355) |
| -- 作者：xiaoqiwei -- 发布时间：2020/1/17 0:44:00 -- 我想问：2020年1月12日更新 的版本 目前稳定吗？ 我想问：2020年1月12日更新 的版本 目前稳定吗？ |
| -- 作者：chen37280600 -- 发布时间：2020/1/17 8:31:00 -- 我手上的几十个项目，还正常。或者说，我常用的代码，在本次升级里没被官方改动 |
| -- 作者：xiaoqiwei -- 发布时间：2020/1/17 12:07:00 -- 那还好，谢谢 [此贴子已经被作者于2020/1/18 0:05:36编辑过]
|
| -- 作者：sloyy -- 发布时间：2020/1/17 16:07:00 -- 用到串口的话,暂不要升级,还存在bug. |
| -- 作者：狐狸爸爸 -- 发布时间：2020/1/17 16:10:00 -- 串口没有bug |
| -- 作者：sloyy -- 发布时间：2020/1/19 16:26:00 -- 可能我表述不清楚,再描述一次: \'打开串口 try Ports.Add("COM1") With Ports("COM1") .Close() .Parity = Parity.None .Handshake = Handshake.None .StopBits = StopBits.One .BaudRate = 2400 .DataBits = 8 .ReadBufferSize() = 2048 .WriteBufferSize() = 2048 .Open dkbz=True End With Catch ex As Exception dkbz=False End Try 这段代码是复制帮助的代码,在一个项目使用了一年多,一直没问题. 从2019年12月20日升级新版本后,在没有串口的机子上运行,就会判断错误,弹出 "端口 com1 不存在的错误提示",然后陷入死循环. 在有串口的机子上,经常刚开机的时候会弹出"端口com1 已关闭" 的提示,同样陷入死循环,然后,重启电脑,就正常了. 现在一出这个端口已关闭的提示,我也只好让操作员重启一两次电脑,直到正常,.但大部分时间不会出错,很让人抓狂. |
| -- 作者：有点蓝 -- 发布时间：2020/1/19 16:50:00 -- Ports.Add("COM1") Dim hasCom1 As Boolean For Each sp As String In Ports.PortNames If sp = "COM1" Then hasCom1 = True exit for End If Next If hasCom1 With Ports("COM1") .Close() .Parity = Parity.None .Handshake = Handshake.None .StopBits = StopBits.One .BaudRate = 2400 .DataBits = 8 .ReadBufferSize() = 2048 .WriteBufferSize() = 2048 .Open End With Else msgbox("没有com1") End If |
| -- 作者：sloyy -- 发布时间：2020/1/19 17:33:00 -- 谢谢有点蓝大师,这段代码,经试验非常成功,端口判断,我已全部改用这段代码. 那是不是以后 try Catch ex As Exception End Try 这段代码不能用来判断串口状态了? 如果是这样,帮助文档对应的代码也要做相应修改,否则会误导后人.
|
| -- 作者：有点蓝 -- 发布时间：2020/1/19 17:35:00 -- try Catch在有些地方还是以使用的。可能底层的一些改动导致串口不对外抛出异常，自己消化了，才出现这个问题。
|