Foxtable(狐表)用户栏目专家坐堂 → [求助]串口DataReceived事件


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

主题:[求助]串口DataReceived事件

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


加好友 发短信
等级:婴狐 帖子:41 积分:335 威望:0 精华:0 注册:2024/6/6 11:09:00
[求助]串口DataReceived事件  发帖心情 Post By:2025/3/24 14:52:00 [只看该作者]

Select Case e.Port.PortName
    Case "COM1"
        If Forms("A").Opened Then
            Forms("A").Controls("开始").PerformClick()
            Forms("B").Controls("no").Value = e.Port.ReadExisting()
        End If 
    Case "COM2"
        Forms("B").Controls("no").Text = e.Port.ReadExisting()
End Select

置入以上代码,执行无效。在A窗口打开的状态下,并未正确执行按钮点击。


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


加好友 发短信
等级:婴狐 帖子:41 积分:335 威望:0 精华:0 注册:2024/6/6 11:09:00
  发帖心情 Post By:2025/3/24 15:01:00 [只看该作者]

我本意是想在COM1接收到数据时,执行一个函数,函数包含了对某一张表的行数据的新增,但是发现函数在此处也无法执行

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


加好友 发短信
等级:超级版主 帖子:113015 积分:575474 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2025/3/24 15:03:00 [只看该作者]

调试

    Case "COM1"
        If Forms("A").Opened Then
msgbox(1)
            Forms("A").Controls("开始").PerformClick()
msgbox(2)
            Forms("B").Controls("no").Value = e.Port.ReadExisting()
        End If 

然后"开始"按钮点击事件第一行也加上msgbox看看能不能弹出

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


加好友 发短信
等级:婴狐 帖子:41 积分:335 威望:0 精华:0 注册:2024/6/6 11:09:00
  发帖心情 Post By:2025/3/24 15:06:00 [只看该作者]

调试msgbox没有弹出

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


加好友 发短信
等级:超级版主 帖子:113015 积分:575474 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2025/3/24 15:09:00 [只看该作者]

所有msgbox没有弹出?说明窗口没有打开,或者是没有接收到串口数据

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


加好友 发短信
等级:婴狐 帖子:41 积分:335 威望:0 精华:0 注册:2024/6/6 11:09:00
  发帖心情 Post By:2025/3/24 15:16:00 [只看该作者]

但是窗口A我已经打开,且A窗口上的textbox被置入了串口读到的数据

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


加好友 发短信
等级:超级版主 帖子:113015 积分:575474 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2025/3/24 15:31:00 [只看该作者]

这不可能。可能是其它地方有接收的代码

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


加好友 发短信
等级:婴狐 帖子:41 积分:335 威望:0 精华:0 注册:2024/6/6 11:09:00
  发帖心情 Post By:2025/3/24 16:03:00 [只看该作者]

我新创建一个项目试试

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


加好友 发短信
等级:超级版主 帖子:113015 积分:575474 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2025/3/24 16:04:00 [只看该作者]

关闭退出项目,删除项目所在的文件夹里的bin目录,然后重启项目试试。

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


加好友 发短信
等级:婴狐 帖子:41 积分:335 威望:0 精华:0 注册:2024/6/6 11:09:00
  发帖心情 Post By:2025/3/24 16:05:00 [只看该作者]

新建一个也不行

 回到顶部
总数 24 1 2 3 下一页