如何用vb编一个小程序，启动QQ并自动登陆？知道的教我一下

用团圆System.Diagnostics.Process.Start(QQ路径)来打开QQ

用System.Windows.Forms.SendKeys.Send（用户名）

System.Windows.Forms.SendKeys.Send("{tab}")

System.Windows.Forms.SendKeys.Send(密码）

System.Windows.Forms.SendKeys.Send("{enter}")

好了，打开了做茄一个QQ

反复循环纯或察打开全部的就行了

'vbs脚本

Set a=CreateObject("WScript.Shell")

Set oExec=a.Exec("C:\睁慧Program Files\Tencent\QQ\Bin\QQ.exe") '程序路径

WScript.Sleep 3000 '延时3秒

a.AppActivate "Q登录"

a.SendKeys "+{TAB}"

a.SendKeys "Q号明早圆"

WScript.Sleep 200

a.SendKeys "{TAB}"

a.SendKeys "激塌密码"

WScript.Sleep 200

a.SendKeys "{ENTER}"

set a=nothing

首先，在腾讯漫画小程序点击登录按钮，选择使用QQ登录。系统会d出QQ登录授权页面，你需要在拦神授权页面上选择允许腾讯漫画小程序获取你的QQ账号信息。如简巧亏果你之前没有登录过QQ账户，则需要先在QQ授权页面上进行登录并授权。授权完成后，腾讯漫画小程序会跳转回主页面，并自动登录你的QQ账号，让你可以使用该账号进行腾讯漫画的宽毕浏览和阅读。

---