前端之家收集整理的这篇文章主要介绍了
VB一键式启动程序,
前端之家小编觉得挺不错的,现在分享给大家,也给大家做个参考。
Dim qq,del Set qq=WScript.CreateObject("wscript.shell") qq.Run """C:\Program Files (x86)\Tencent\QQ\QQProtect\Bin\QQProtect.exe""" ' 这里填写QQ路径,此处填写
绝对路径 . 三对双引号.请注意. WScript.Sleep 5000 qq.SendKeys "自己填写" ' 这里填写QQ密码 WScript.Sleep 1000 qq.SendKeys "{ENTER}" WScript.Sleep 3000 qq.Run """C:\Users\Administrator\AppData\Local\Genuitec\MyEclipse 8.5\myeclipse.exe""" 'MyEclipse安装路径 WScript.Sleep 12000 qq.SendKeys "{ENTER}" 'qq.Run """D:\Program Files\Foxmail 7.0\Foxmail.exe""" 'MyEclipse安装路径 'WScript.Sleep 500 'qq.SendKeys "{F4}"
原文链接:https://www.f2er.com/vb/258738.html