标题：QQ发送消息问题, 消息窗闪现，消息未发送

1楼

jinn 发表于：2016/3/25 15:12:50

Sub APPLICATION_VBAStart()

QQMSGX

End Sub

Sub QQMSGX

Set obj = CreateObject("WWSCommon.TCGroup")

mxmsg = " 信号 "& Date &" " & Time & vbCr & " 信号"

call obj.TransMessage("EEB", mxmsg)

End Sub

EEB为窗口名称

qq7.1(14522)

2楼

王锋发表于：2016/3/25 15:22:22

QQ的消息发送设置是否设置了 Enter健直接发送

3楼

jinn 发表于：2016/3/25 15:55:46

已经设置了

4楼

王锋发表于：2016/3/25 16:00:17

多试几次了，看你的代码是在VBA启动的时候做的动作，QQ发送消息时会劫持你的鼠标做模拟点击动作，你是否跟系统抢鼠标，导致鼠标被你强制移动到窗口外导致的消息发送失败

5楼

jinn 发表于：2016/3/25 16:07:15

我试了有些日子了，窗口在前面保持激活状态，但是消息未写入消息框还是，但是消息框会自动跳没

6楼

王锋发表于：2016/3/25 16:13:38

那你试试QQ的其他版本了，或者关闭杀毒软件什么的，排除一些其他干扰等等

7楼

jinn 发表于：2016/3/25 16:40:07

明白，我已升级了8.0问题还存在，确实得试试是不是杀毒软件的问题

8楼

qucheng686 发表于：2019/7/1 22:03:18

楼主, 你的问题解决了吗? 我也有这种问题, 消息窗闪现，消息未发送出去. 10次里有2次发不出去

共8 条记录, 每页显示 10 条, 页签: [1]