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

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

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

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

其实这用的只是很基础的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)

相关推荐

  • 跌至1299元,骁龙处理器+8GB运存+大电池,售价亲民的OPPO千元机

    如今在高性价比手机的选择上,已经不再仅仅只有小米手机可选了,无论是OPPO的Realme,还是vivo的iQOO,所发布的手机性价比也是十分高的,甚至不少都入手了真我手机和iQOO…

    2021年7月13日 news
  • 嫩江县明娟月租房公寓

    嫩江县明娟月租房公寓,办公室地址位于资源富集、美丽神奇的边境滨江城市–黑河,黑龙江省黑河市嫩江县站前大街185号铁路拆迁房,我单位主要提供月租房, 企业名称:嫩江县明娟…

  • 申志文

    基本内容 申志文,男,汉族,中共党员,河北邯郸人,毕业于河北大学历史系。峰峰矿区第九、十、十一届政协委员,职称馆员,书法家。现为中国书法家协会会员、全国名人书画艺术界联合会委员、中…

    news 2022年8月13日
  • 兰州天盛物流有限公司

    兰州天盛物流有限公司办公室地址位于黄河穿越市区中心而过的省会城市兰州,甘肃省兰州市七里河区敦煌路349号513室,于2007年06月18日在兰州市工商行政管理局专业市场管理分局注册…

  • 中煤科工集团工程科技有限公司

    中煤科工集团工程科技有限公司办公室地址位于中国的首都,政治、文化中心北京,北京北京市朝阳区和平街十三区35号楼8层801,于2014年01月27日在北京市工商行政管理局注册成立,注…

  • 北京诸葛找房信息技术有限公司

    北京诸葛找房信息技术有限公司注册成立于2015年12月08日,总部位于北京是朝阳区,下设上海、哈尔滨、重庆、无锡等多个分公司。致力于用大数据揭示真实可信的房源信息。诸葛找房将大数据…

  • 依纳富艾基(北京)科技有限公司

    依纳富艾基(北京)科技有限公司办公室地址位于中国的首都,政治、文化中心北京,北京北京市通州区景盛南四街15号22幢1层101,于2019年01月31日在北京市工商行政管理局通州分局…

  • 北京博跃科技有限公司

    北京博跃科技有限公司办公室地址位于中国的首都,政治、文化中心北京,北京北京市海淀区上地十街1号院3号楼11层1109,于2015年09月08日在海淀分局注册成立,注册资本为100万…

  • 吴孟超遗体身覆党旗鲜花丛中安眠,现场再次响起国际歌!

    5月26日,上海“中国肝胆外科之父”吴孟超院士遗体告别仪式在龙华殡仪馆举行。 上午9时左右,天空下起雨,市民们打伞雨中等待。殡仪馆前,有不少外地市民送花写卡片悼念吴孟超院士。吴老的…

    2021年7月2日 news
  • 50句父亲节文案|爸爸永远是我的超人

    《淮南子·缪称训》有言:“慈父之爱子,非为报也,不接内解于心。”父亲对子女的爱,大概并不都是为了企求得到任何物质性的回报,而只是源于本性、处于本心。 父爱如山,岿然不动;父爱如海,…

    news 2021年7月11日