易语言实现自动发送QQ信息的代码

全局变量表

.版本 2
.全局变量 局_句柄, 整数型
.全局变量 b, 整数型

QQ自动发送信息

此功能需要加载精易模块5.6

.版本 2
.支持库 spec
.支持库 eAPI
.程序集 窗口程序集_启动窗口
.程序集变量 逻辑, 逻辑型
.子程序 _暂停按钮_被单击
时钟1.时钟周期 = 0
.子程序 _好友按钮_被单击
逻辑 = 假
时钟1.时钟周期 = 1500
.子程序 功能_取句柄, 整数型
.参数 名称, 文本型
局_句柄 = 窗口_取句柄 (, , “TXGuiFoundation”, 名称)
返回 (局_句柄)
.子程序 _时钟1_周期事件
.判断开始 (逻辑 = 假)
  好友 ()
.默认
  群友 ()
.判断结束
.子程序 群友
功能_取句柄 (号码编辑框.内容)
b = 局_句柄
鼠标_单击 (取鼠标水平位置 (), 取鼠标垂直位置 ())
窗口_限制尺寸 (b, 293, 540, , )
延迟 (200)
键盘_消息 (b, #下光标键, 3, )
延迟 (200)
键盘_消息 (b, #回车键, 3, )
延迟 (200)
模拟按键 (#Ctrl键, #V键, )
延迟 (200)
模拟按键 (#回车键, , )
延迟 (200)
模拟按键 (#Ctrl键, #W键, )
.子程序 好友
功能_取句柄 (“QQ”)
b = 局_句柄
窗口_限制尺寸 (b, 293, 540, , )
延迟 (200)
键盘_消息 (b, #下光标键, 3, )
延迟 (200)
键盘_消息 (b, #回车键, 3, )
延迟 (200)
模拟按键 (#Ctrl键, #V键, )
延迟 (200)
模拟按键 (#回车键, , )
延迟 (200)
模拟按键 (#Ctrl键, #W键, )
.子程序 _QQ群按钮_被单击
逻辑 = 真
时钟1.时钟周期 = 1500

运行结果:

总结

以上就是这篇文章的全部内容了,希望本文的内容对大家的学习或者工作具有一定的参考学习价值,谢谢大家对菜鸟教程(cainiaojc.com)的支持。如果你想了解更多相关内容请查看下面相关链接

声明:本文内容来源于网络,版权归原作者所有,内容由互联网用户自发贡献自行上传,本网站不拥有所有权,未作人工编辑处理,也不承担相关法律责任。如果您发现有涉嫌版权的内容,欢迎发送邮件至:notice#cainiaojc.com(发邮件时,请将#更换为@)进行举报,并提供相关证据,一经查实,本站将立刻删除涉嫌侵权内容。