广州天河区派出所:如何用VB/VC++之类的制作一个这样的东东?

来源：百度文库编辑：杭州交通信息网时间：2024/05/06 09:04:09

根据下面的代码用VB/ Delphi或 VC++制作一个QQ登陆器

Dim WshShell, QQPath, QQselect
QQPath="c:\Progra~1\Tencent\QQ\CoralQQ.exe" 'QQ所在路径
Set WshShell=WScript.CreateObject("WScript.Shell")
WshShell.Run QQPath
WScript.Sleep 2000
WshShell.AppActivate "QQ登录1"
WshShell.SendKeys "+{TAB}"
WshShell.SendKeys "123456789" 'QQ号码
WScript.Sleep 200
WshShell.SendKeys "{TAB}"
WshShell.SendKeys "123456789" 'QQ密码
WScript.Sleep 200
WshShell.SendKeys "{ENTER}"

.SendKeys 函数在vb里面也有，用shell函数运行QQ程序，AppActivate的效果也可以用api函数来实现，自己看一下资料吧，很简单的。

就这么简单吗
这样就可以运行qq了吗

如何用VB/VC++之类的制作一个这样的东东? 如何用VB制作如何用VB制作广告牌如何用vb制作广告牌如何用VB制作简陋的MP3播放器如何用VB制作简单的播放器? 如何用VB制作电子宠物如何用VB制作一个浏览器如何用VB制作俄罗斯方块游戏如何用VC++6。0制作弹出式对话框