vbs代码
啥也不说了,直接上代码,保存为.vbs即可:
1 电脑说话
set objTTS = createobject("sapi.spvoice")
objTTS.speak "我自横刀向天笑,笑完我就去睡觉"
2 无限弹出窗口
while(1)
msgbox("关不掉我吧")
msgbox("哈哈,还是关不掉我")
msgbox("你就是关不掉我")
msgbox("大爆发,我就是这么强大")
msgbox("关不掉我吧")
msgbox("啦啦啦")
msgbox("你拿我没办法")
msgbox("哈哈哈")
msgbox("气死你,哈哈哈哈")
Wend
相关阅读
步骤一:在电脑上新建一个txt文件步骤二:将以下代码复制过去(中文可以改)const title = “爱情测试”const yourname = “嫦娥”const
第一个、打开txt文件,复制以下代码粘贴进去(可以修改中文部分,其它代码不要动!)。保存并关闭txt文件。msgbox("做我女朋友好吗?")msgbox
2017-11-09 0叶白0 阅 20245 转 2021 转藏到我的图书馆 一、你打开好友的聊天对话框,然后记下在你QQ里好友的昵称,
恶作剧(病毒)的vbs代码,这里提供的都是一些死循环或导致系统死机的vbs对机器没坏处,最多关机重启一下就可以了 打开记事本,把代码复
1、VBS获取系统安装路径/*先定义这个变量是获取系统安装路径的,然后我们用“&strWinDir&”调用这个变量。*/setWshShell = WScript