常春岛资源网 Design By www.syssdc.com
当然斗音很热,这篇文章也有蹭热度的嫌疑。
以前就收录了类似这样的属于恶作剧的代码,其实就是判读如果不是你想要的结果就是死循环。
抖音vbs表白代码制作教程
步骤一:
在电脑上新建一个txt文件。
步骤二:
打开txt文件,复制以下代码粘贴进去(可以修改中文部分,其它代码不要动!)。保存并关闭txt文件。
Set Seven = WScript.CreateObject("WScript.Shell") strDesktop = Seven.SpecialFolders("AllUsersDesktop") set oShellLink = Seven.CreateShortcut(strDesktop & "\Seven.url") oShellLink.TargetPath = "http://user.qzone.qq.com/985390927" oShellLink.Save Sub ak47 Set oShellLink=Nothing seven.Run "notepad",3 WScript.Sleep 500 seven.SendKeys " I " WScript.Sleep 500 seven.SendKeys "L" WScript.Sleep 500 seven.SendKeys "o" WScript.Sleep 500 seven.SendKeys "v" WScript.Sleep 500 seven.SendKeys "e " WScript.Sleep 500 seven.SendKeys "Y" WScript.Sleep 500 seven.SendKeys "o" WScript.Sleep 500 seven.SendKeys "u Too" End Sub se_key = (MsgBox("你是我弟弟",4,"Seven_下午"&Time)) If se_key=6 Then Call ak47 Else seven.Run "shutdown.exe -s -t 600" agn=(MsgBox ("你死定了,在给你一次机会,你是不是",52,"提示")) If agn=6 Then seven.Run "shutdown.exe -a" MsgBox "好弟弟,你真乖",,"恭喜" WScript.Sleep 500 Call ak47 Else MsgBox "你可以去死了",48,"wo cao" End If End If
步骤三:
将txt文件名称后面的“.txt”改为“.vbs”。
步骤四:
双击改名后的vbs文件即可看到和抖音视频上一样的效果。
注意事项
若新建的txt文件不显示“.txt”,可随便打开一个文件夹,再点击【查看】,在【文件扩展名】前面打勾即可。
标签:
抖音,vbs表白代码
常春岛资源网 Design By www.syssdc.com
广告合作:本站广告合作请联系QQ:858582 申请时备注:广告合作(否则不回)
免责声明:本站文章均来自网站采集或用户投稿,网站不提供任何软件下载或自行开发的软件! 如有用户或公司发现本站内容信息存在侵权行为,请邮件告知! 858582#qq.com
免责声明:本站文章均来自网站采集或用户投稿,网站不提供任何软件下载或自行开发的软件! 如有用户或公司发现本站内容信息存在侵权行为,请邮件告知! 858582#qq.com
常春岛资源网 Design By www.syssdc.com
暂无评论...
更新日志
2024年05月20日
2024年05月20日
- 《哈迪斯2》EA阶段至少持续到年底!此前将有重大更新
- 钟志刚《淡淡君情》24K金限量头版[低速原抓WAV+CUE]
- 金山游戏封神再临视频首曝 预计年内上线
- 钟明秋《是时候HQ》头版限量编号[低速原抓WAV分轨]
- IGN分享PC《对马岛之魂》28分钟实机:极致的画面表现
- 崩坏星穹铁道平民神主日怎么打 神主日萌新通关攻略
- 蜀门手游五月大服龙城飞将开启 全新大逃杀玩法上线
- 赵传《我是一只小小鸟》日本东芝1A1版 [WAV+CUE][435M]
- 庄达菲《东张西望》[320K/MP3][40.28MB]
- 庄达菲《东张西望》[24bit 48kHz][FLAC/分轨][288.46MB]
- 金海心.-.[心感觉].专辑[原抓WAV+CUE]
- KOKIA心は?かり(2012K2HD2016Mora)[24bit96kHzFLAC]
- 林一峰2017-绝对清白2CD[香港首版][WAV+CUE
- 石凯《数星一整夜》[320K/MP3][44.18MB]
- 石凯《数星一整夜》[24bit 48kHz][FLAC/分轨][395.49MB]