Foxtable(狐表)用户栏目专家坐堂 → 我想问:2020年1月12日更新 的版本 目前稳定吗?


  共有2620人关注过本帖树形打印复制链接

主题:我想问:2020年1月12日更新 的版本 目前稳定吗?

帅哥哟,离线,有人找我吗?
xiaoqiwei
  1楼 | QQ | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:三尾狐 帖子:668 积分:8549 威望:0 精华:0 注册:2011/5/5 23:55:00
我想问:2020年1月12日更新 的版本 目前稳定吗?  发帖心情 Post By:2020/1/17 0:44:00 [只看该作者]

我想问:2020年1月12日更新 的版本 目前稳定吗?

 回到顶部
帅哥哟,离线,有人找我吗?
chen37280600
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:六尾狐 帖子:1264 积分:7827 威望:0 精华:4 注册:2017/12/31 14:53:00
  发帖心情 Post By:2020/1/17 8:31:00 [只看该作者]

我手上的几十个项目,还正常。或者说,我常用的代码,在本次升级里没被官方改动

 回到顶部
帅哥哟,离线,有人找我吗?
xiaoqiwei
  3楼 | QQ | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:三尾狐 帖子:668 积分:8549 威望:0 精华:0 注册:2011/5/5 23:55:00
  发帖心情 Post By:2020/1/17 12:07:00 [只看该作者]

那还好,谢谢
[此贴子已经被作者于2020/1/18 0:05:36编辑过]

 回到顶部
帅哥哟,离线,有人找我吗?
sloyy
  4楼 | QQ | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:九尾狐 帖子:2177 积分:13784 威望:0 精华:2 注册:2012/2/25 10:59:00
  发帖心情 Post By:2020/1/17 16:07:00 [只看该作者]

用到串口的话,暂不要升级,还存在bug.

 回到顶部
帅哥哟,离线,有人找我吗?
狐狸爸爸
  5楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:管理员 帖子:47448 积分:251048 威望:0 精华:91 注册:2008/6/17 17:14:00
  发帖心情 Post By:2020/1/17 16:10:00 [只看该作者]

串口没有bug

 回到顶部
帅哥哟,离线,有人找我吗?
sloyy
  6楼 | QQ | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:九尾狐 帖子:2177 积分:13784 威望:0 精华:2 注册:2012/2/25 10:59:00
  发帖心情 Post By: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 已关闭" 的提示,同样陷入死循环,然后,重启电脑,就正常了.
现在一出这个端口已关闭的提示,我也只好让操作员重启一两次电脑,直到正常,.但大部分时间不会出错,很让人抓狂.


 回到顶部
帅哥,在线噢!
有点蓝
  7楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:105489 积分:536436 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By: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
  8楼 | QQ | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:九尾狐 帖子:2177 积分:13784 威望:0 精华:2 注册:2012/2/25 10:59:00
  发帖心情 Post By:2020/1/19 17:33:00 [只看该作者]

谢谢有点蓝大师,这段代码,经试验非常成功,端口判断,我已全部改用这段代码.

那是不是以后 
try  

Catch ex As Exception
    
End Try
这段代码不能用来判断串口状态了?
如果是这样,帮助文档对应的代码也要做相应修改,否则会误导后人. 

 回到顶部
帅哥,在线噢!
有点蓝
  9楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:105489 积分:536436 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2020/1/19 17:35:00 [只看该作者]

try  Catch在有些地方还是以使用的。可能底层的一些改动导致串口不对外抛出异常,自己消化了,才出现这个问题。

 回到顶部