1. 热点新闻收集网首页
  2. 新闻

火热的程序员表白方式，调皮弹窗表白代码，赶紧拿去试试吧

天天就搞机 • • 新闻 • 阅读 30

火热的程序员表白方式，调皮弹窗表白代码，赶紧拿去试试吧火热的表白程序

最近某音上程序员表白代码火了起来，看到别人用代码撩自己喜欢的小姐姐是不是心痒难耐，愤恨不已，是不是也想撩一撩自己喜欢的小姐姐，那就来试试吧！

火热的程序员表白方式，调皮弹窗表白代码，赶紧拿去试试吧表白程序演示

其实这用的只是很基础的VB脚本代码就能做出来了，而这次小编专门收集了一些很有意思的代码分享给大家。有各种代码哦，表白，恶搞的都有，具体操作很简单，接下来小编就来教大家一下。（超简单的，学不会你可以打死我，学会了你就点个赞评论666咯，哈哈）

火热的程序员表白方式，调皮弹窗表白代码，赶紧拿去试试吧将代码复制到txt文本

首先在桌面新建一个txt文本，然后将代码复制进去，里面中文的内容可以根据自己的需求来修改（开启你的脑洞，发挥你的想象，马上你就玩的比小编还6），而英文和标点符号千万不要修改哦，改了就无法执行了。先来第一个“强行表白大法”，下面是代码

msgbox "做我女朋友好吗",vbQuestion,"在吗"

msgbox ("房产写你名字")

msgbox ("保大")

msgbox ("我妈会游泳")

dim j

do while j<1

Select Case msgbox("做我女朋友好吗",68,"请郑重的回答我")

Case 6 j=1

Case 7 msgbox("再给你一次机会")

end Select

loop

msgbox("我就知道你会同意的，哈哈哈哈")

修改好之后保存，再右击文件重命名将文件.txt 后缀改为 .vbs 后缀。（这里补充一点如果没有显示文件后缀的小伙伴，可以在我的电脑里进入文件夹和搜索选项，再去掉隐藏已知文件类型的扩展名的勾再点确定就行了，具体操作看下面，4步搞定）

火热的程序员表白方式，调皮弹窗表白代码，赶紧拿去试试吧火热的程序员表白方式，调皮弹窗表白代码，赶紧拿去试试吧Win7操作方式

上面是Win7的修改方式，如果你电脑是Win10的，那就按下面这个方式来修改就可以咯

火热的程序员表白方式，调皮弹窗表白代码，赶紧拿去试试吧Win10操作方式火热的程序员表白方式，调皮弹窗表白代码，赶紧拿去试试吧Win10操作方式

如果上面4步都做了，还是不能显示文件后缀，那可能是你没勾选下面这个选项，只需勾选一下就可以了。

火热的程序员表白方式，调皮弹窗表白代码，赶紧拿去试试吧Win10操作方式

修改完后，就完成了，然后双击就可以启动vbs脚本啦（嗨起来！）是不是很简单。做我女朋友好吗？（不同意？不存在的，不点同意是关闭不了的，除了同意点哪都没用，你就从了我吧，毕竟我这么帅还这么好，哈哈。）

火热的程序员表白方式，调皮弹窗表白代码，赶紧拿去试试吧强势表白火热的程序员表白方式，调皮弹窗表白代码，赶紧拿去试试吧做我女朋友好吗Mua ~

还有一些恶搞的代码，比如倒计时60秒威胁关机的程序，必须输入指定文字（比如我是猪，我要帮xxx洗脚，反正放开你的脑洞，嗨起来）才可以解除，用来教育一下不听话的小女朋友，是个不错的选择，哈哈。以及整蛊好友的网页代码（这个只需将 .txt的后缀修改为 .HTML），大家可以根据自己的想法进行不同的尝试。

第一个：说我要帮xxx洗脚，不然一分钟关机（后缀改成 .vbs）

on error resume next

dim WSHshellA

set WSHshellA = wscript.createobject("wscript.shell")

WSHshellA.run "cmd.exe /c shutdown -r -t 60 -c ""说我要帮xxx洗脚，不说就一分钟关你机，不信，试试···"" ",0 ,true

dim a

do while(a <> "我要帮xxx洗脚")

a = inputbox ("说我要帮xxx洗脚，就不关机，快撒，说 ""我要帮xxx洗脚""　","说不说","不说",8000,7000)

msgbox chr(13) + chr(13) + chr(13) + a,0,"MsgBox"

loop

msgbox chr(13) + chr(13) + chr(13) + "早说就行了嘛，乖乖"

dim WSHshell

set WSHshell = wscript.createobject("wscript.shell")

WSHshell.run "cmd.exe /c shutdown -a",0 ,true

msgbox chr(13) + chr(13) + chr(13) + "宝宝是不是又帅啦？？"

第二个：说我是猪，不然关机哦（后缀改成 .vbs）

set ws=createobject("wscript.shell")

call shutdown(1)

do while a<>"我是猪"

a=inputbox("快在下面的框框里输入我是猪,否则后果自负，快输""我是猪"" ","输不输","")

loop

call shutdown(2)

msgbox "早说就行了嘛",4096+64

msgbox"再输一遍我是猪!",4096+64

msgbox"我是猪!",4096+64

MsgBox"最后一次!",4096+64

MsgBox"如果你很快的点过去,不看的话",4096+64

MsgBox"我就要你踩我空间的!哼!",4096+64

MsgBox"从前有座山!",4096+64

MsgBox"山里有个庙.",4096+64

MsgBox"庙里有个老和尚在讲故事.",4096+64

ws.run"iexplore.exe http://new.qzone.qq.com/137841986/infocenter"

msgbox"哎呀累了！数绵羊哄我睡觉",4096+64

for i=1 to 100

MsgBox i&"只绵羊",4096+64

next

msgbox"哎呀我困了，这次就饶过你吧，下次注意哦!",4096+64

msgbox"最后问个问题，我是不是大好人！",4096+64

if inputbox("是不是","请选择","是")<>"是" then

call shutdown(1)

end if

sub shutdown(s)

select case s

case 1

ws.run"cmd.exe /c shutdown -r -t 60 -c",0

case 2

ws.run"cmd.exe /c shutdown -a",0

end select

end sub

第三个：知错了吧（这个后缀修改为 .HTML）

<html>

<head>

<meta http-equiv="Content-Type" content="text/html; charset=gb2312">

<title>网页特效|Linkweb.cn/Js|—很恶心的常见整人效果</title>

</head>

<body>

<a href="" onMouseover="alert(‘为什么把鼠标放到这里?’);

alert(‘我不是说过不可以这样吗？’);

alert(‘你把我的话当什么了？’);

alert(‘你知道错了吗？’);

alert(‘什么？你居然….’);

alert(‘居然还没意识到自己做错了？’);

alert(‘那好，你要为此付出代价!’);

alert(‘我要你在这里点足一千下……’);

alert(‘什么？你开始有点后悔了？’);

alert(‘何必呢？’);

alert(‘你当初干什么去了？’);

alert(‘不原谅你！’);

alert(‘好从现在开始再点995下……’);

alert(‘你的手开始累了吗?’);

alert(‘什么？你已经没力气了？’);

alert(‘你一直在求我原谅你啊！’);

alert(‘看来你是真的知道错了!’);

alert(‘下次你还会这么做吗？’);

alert(‘真的不会了？’);

alert(‘那好，今天就放你一马！’);

alert(‘写封信给我说声对不起!’);

alert(‘你能这么做我很高兴!!!’);

document.bgColor=’black’;

document.fgColor=’White’;

window.location.href=’mailto:mygod@god?subject=对不起,下次不敢了!’;">不许把鼠标移到这里</a>

</body>

</html>

好啦，分享完毕，赶紧去撩妹吧。对了，提醒一点，因为这些脚本有些是带修改和限制代码的所以会被360或者电脑管家等杀毒软件误杀的，所以小伙伴在撩妹前，记得先将杀毒软件退出再开始哦。

火热的程序员表白方式，调皮弹窗表白代码，赶紧拿去试试吧做我女朋友好吗

对了，关于这个程序，这个是用C语言写的，相对电脑小白来说制作起来会比较麻烦，不容易实现，不过没事，小编这里有现成的，需要的小伙伴可以下方评论留下你的邮箱，小编可以私发给你。最后，如果有小伙伴表白成功了记得回来打卡哦！

关注不迷路，每日更新最新科技趣闻，偶尔分享电脑手机小技巧，带你漫步科技前沿。

赞 (0)
天天就搞机天天就搞机
0
上一篇 2020年11月13日 am10:41
下一篇 2020年11月13日 am10:41

相关推荐