Question

按键精灵逐行读取文本并复制粘贴到QQ聊天窗口按回车发出去

或者用其他语言也行 回答代码就好
VB、C++也行，或者C语言吧 还有大神吗？

• 你的回答被采纳后将获得：
• 系统奖励15（财富值+成长值）+难题奖励10（财富值+成长值）+提问者悬赏70（财富值+成长值）

Answer 1

Rem 输入字腔迅察符
BT=InputBox("请输入聊天窗口标题如多个窗口可用 | (例子： 张山|李世|马五 ) 符号分昌猛隔 注伍茄：多个窗口时聊天窗口要分离")
If BT= "" Then
Goto 输入字符
End If
Text = Plugin.File.ReadFileEx("C:\Config.txt")
MyArray = Split(Text, "|")
If UBound(MyArray)>=0 Then
For e=0 to UBound(MyArray)
BT=BT&"|"
BTT= Split(bt, "|")
For i=0 to UBound(BTT)-1
Hwnd = Plugin.Window.Find("TXGuiFoundation", BTT(I))
Call Plugin.Window.SendString(Hwnd, MyArray(E))
Call Plugin.Bkgnd.KeyPress(Hwnd, 13)
Next
Next
End If

追问

刚刚测试 ，文本输入好奇怪 既不是全部 也不是逐行 而且并没有发送出去啊？

追答

有可能是 发送信息的快捷键的问题 我这是 回车 发送信息