程序员求婚代码html,⽕热的程序员表⽩⽅式，调⽪弹窗表⽩代
码，赶紧拿去试试吧...
七⼣快到了，在抖⾳看那些⼤⼿⼦⽤代码撩⾃⼰喜欢的⼩是不是⼼痒难耐，愤恨不已，是不是也想撩⼀撩⾃⼰喜欢的⼩，那就来试试吧！
其实这⽤的只是很基础的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("我就知道你会同意的，哈哈哈哈")
web前端开发学习Q-q-u-n： 767273102 ，分享开发⼯具，零基础，进阶视频教程，希望新⼿少⾛弯路
修改好之后保存，再右击⽂件重命名将⽂件.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 = ateobject("wscript.shell")
WSHshellA.run " /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 = ateobject("wscript.shell")
WSHshell.run " /c shutdown -a",0 ,true
msgbox chr(13) + chr(13) + chr(13) + "宝宝是不是⼜帅啦？？"
web前端开发学习Q-q-u-n： 767273102 ，分享开发⼯具，零基础，进阶视频教程，希望新⼿少⾛弯路
第⼆个：说我是猪，不然关机哦(后缀改成.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+64vbs小程序代码大全
MsgBox"最后⼀次!",4096+64
MsgBox"如果你很快的点过去，不看的话",4096+64
MsgBox"我就要你踩我空间的!哼!",4096+64
MsgBox"从前有座⼭!",4096+64
MsgBox"⼭⾥有个庙.",4096+64
MsgBox"庙⾥有个⽼和尚在讲故事.",4096+64
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. /c shutdown -r -t 60 -c",0
case 2
ws. /c shutdown -a",0
end select
end sub
web前端开发学习Q-q-u-n： 767273102 ，分享开发⼯具，零基础，进阶视频教程，希望新⼿少⾛弯路
第三个：知错了吧(这个后缀修改为.HTML)
⽹页特效|Linkweb/Js|---很恶⼼的常见整⼈效果
web前端开发学习Q-q-u-n： 767273102 ，分享开发⼯具，零基础，进阶视频教程，希望新⼿少⾛弯路
好啦，分享完毕，赶紧去撩妹吧。对了，提醒⼀点，因为这些脚本有些是带修改和限制代码的所以会被360或者电脑管家等杀毒软件误杀的，所以⼩伙伴在撩妹前，记得先将杀毒软件退出再开始哦。

版权声明：本站内容均来自互联网，仅供演示用，请勿用于商业和其他非法用途。如果侵犯了您的权益请与我们联系QQ:729038198，我们将在24小时内删除。