Foxtable(狐表)用户栏目专家坐堂 → 1月12日的重要更新 端口错误问题依然没有解决


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

主题:1月12日的重要更新 端口错误问题依然没有解决

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


加好友 发短信
等级:超级版主 帖子:106603 积分:542186 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2020/1/12 21:26:00 [显示全部帖子]

明天再反馈一下

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


加好友 发短信
等级:超级版主 帖子:106603 积分:542186 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2020/1/13 8:49:00 [显示全部帖子]

换种方式判断

For Each sp As String In Ports.PortNames
    If sp <> "COM1" Then
        msgbox("COM1不存在")
        Return
    End If
Next

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


加好友 发短信
等级:超级版主 帖子:106603 积分:542186 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2020/1/13 10:05:00 [显示全部帖子]

3楼的判断方法有的问题,这样判断
Dim hascom1 As Boolean
For Each sp As String In Ports.PortNames
    If sp = "COM1" Then
        hascom1 = True
        Exit For
    End If
Next
If not hascom1 Then
    msgbox("COM1不存在")
    Return
End If

 回到顶部