给你一个思路,绝对可行
Private Declare Sub Sleep Lib "Kernel32" (ByVal dwMilliseconds As Long)
Private Sub Command1_Click()
SendKeys "账号1234567", True
Sleep 1000
SendKeys "{TAB}", True
Sleep 1000
SendKeys "密码7654321", True
Sleep 1000
SendKeys "{ENTER}", True
End Sub
其他功能代码 自己扩展一下即可
希望可以帮到你
原理其实不难:
1。找到要登录的窗口的handle(findwindow)
2. 找到输入框的handle,发送key
3. 再模拟点击事件,发送回车key
都有注入保护的,要是随便一个程序都能那样,QQ不被轮了千万遍了。。