易语言实现自动发送QQ信息的代码
作者:易语言源码贝贝吧
今天小编就为大家分享一篇关于易语言实现自动发送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
运行结果:
总结
以上就是这篇文章的全部内容了,希望本文的内容对大家的学习或者工作具有一定的参考学习价值,谢谢大家对脚本之家的支持。如果你想了解更多相关内容请查看下面相关链接