我想编写一个vbs整人代码来表白，谁能帮我一下
第一步：在桌面（其实任何地方都可以）新建一个记事本程序。
第二步：将如下代码拷贝进去 dim WSHshell set ws=wscript.createobject(wscript.shell) ws.run shutdown -s -t 3600000,0 注：其中的“3600000”是设定的自动关机时间，可以自行更改
点击保存后，退出，将文件拓展名“txt”改为“vbs”遇到 警告提示对话框，点击 “确定”。
完成程序，自己可以试试。
注：如要修改关机时间请将文件拓展名改为“txt”后，用记事本打开 编辑。
或者使用右键点击，选择 打开方式-记事本 即可。
抖音上的表白代码是什么 抖音表白代码怎么写
以前大家总说工科生不懂浪漫，但最近DJ抖音网很流行用代码来表白，将代码编写好，然后将文档发给要表白的对象，然后就可以等着对方进入你的表白套路了。
其实这是弹窗表白的代码不是很复杂，一般人按照步骤来都可以做到，下面就来看看具体的步骤：1、KS97新建一个文本 输入代码2、鼠标左键点击文本左上角文件，再点击另存为。
3、点击后会弹出以下窗口，文件名改成：表白示例.vbs，保存类型改为：所有文件，然后点击确定。
4、点击确定后，完成制作，电脑桌面上会显示一个vbs文件。
鼠标左键双击单开刚才保存vbs文件，就会像抖音里面的一样了。
抖音表白代码怎么写方法一msgbox(做我女朋友好吗?)msgbox(房产证写你名字...)msgbox(保大...)msgbox(我妈会游泳..)x=msgbox(做我女朋友好不好，VbOkCancel)if x=VbOk thenmsgbox(爱你，么么哒)elseif x=VbCancel thenmsgbox(哼，再见)set ws=createobject(wscript.shell)ws.runcmd.exe \\\/cshutdown-s -f -t 0end if使用方法：将第一段示例或者第二段示例复制到一个新建的文本文档中，保存。
然后修改文本文档的后缀为vbs，如果会弹出如下面的弹窗，就表明成功了。
大家可以随意修改里面的字，也可以加更多段msgbox带括号的那种。
方法二直接在电脑上打开一个记事本输入一下内容asgbox(“做我女朋友好吗?”)hsgbox(房产证上写称名”)asgbox(保大”)hsgbox(我妈会游泳)1文字可以任意输入保存在桌面上将记事本的后缀改成.vbs，效果如下图，打开文本即可跳出对话框界面
抖音vbs表白代码怎么用
最近好像某音上vbs表白挺火的小姐姐们都受不了这种撩人的套路呢那我就为广大男同胞分享一个哦
先创建一个空文本，然后将下面分割线里的复制粘贴进去汉字部分就自行选词代替啦——————————————我是分割线——————————————msgbox 啊哈哈哈哈哈哈
想不到吧
msgbox 先问个简单的问题，我经常和你说你一定知道const title = 啊哈哈哈哈一定要做完啊const yourname = XXX纪念日const question = 今天是个特殊的日子呐，你记得是什么日子吗
const info = 不对不对，XXX说错了。
给一个提示 XXXJNRconst scend = 啧啧啧，怎么这么厉害了呐
dim youranswerdoyouranswer = inputbox(question, title)if youranswer <> yourname then msgbox info, vbinformation+vbokonly, titleloop until youranswer = yournamemsgbox scend, vbinformation+vbokonly, titlemsgbox 嗯嗯，不错不错，看来低能小白在爸爸的调教下冰雪聪明了许多啊= =msgbox 那再问你个问题，不怕被锤脑壳就乖乖得哦on error resume nextdim WSHshellAset WSHshellA = wscript.createobject(wscript.shell)WSHshellA.run cmd.exe \\\/c shutdown -r -t 180 -c 你最喜欢的人是谁
请在下面的方框中输入他（她）的名字，否则会被关机...... ,0 ,truedim ado while (a <> 猪悟空)a = inputbox (你最喜欢的人是谁
请在下面的方框中输入他（她）的名字，否则会被关机......,说假话的人是要被锤脑壳的哦,,8000,7000)if ( a <> 猪悟空 ) thenmsgbox 不对不对，说错了。
难道你不稀罕我的狗命了莫end ifloopdim WSHshellset WSHshell = wscript.createobject(wscript.shell)WSHshell.run cmd.exe \\\/c shutdown -a,0 ,truemsgbox 你才姓猪
msgbox(既然这样)msgbox(做我女朋友好吗)msgbox(不能拒绝)msgbox(房产证写你名)msgbox(我保大)msgbox(我妈会游泳)msgbox(你腿长)msgbox(你漂亮)msgbox(心是你的，肉体也是你的，每一块腹肌都是你的)msgbox(只做你的XXX)do while j<1 Select Case msgbox(那么，，做我女朋友好吗,68,请郑重的回答我) Case 6 j=1 Case 7 msgbox(再给你一次机会) end Select loopmsgbox 哈哈哈哈，好乖msgbox 做到这一定是通关了msgbox 啾咪
——————————————我是分割线——————————————亲手做的质量比较高哦
再之就是将txt改成vbs就OK了
有没有觉得时机已经成熟的同胞们可以试试哦
在不追到手就是别人家的女票啦
怎么把txt文件转换为vbs
打开记事本，把上面的代码粘贴上去，文件--另存为---文件名 ”eg.vbs“ （一定要带双引号）--保存另：如果文件名eg.vbs不带双引号，保存类型选择所有类型（或*.*)--保存，效果也是一样的。
怎样用记事本做个整人的程序
先打开记事本然后在记事本中输入命令：shutdown -r -t 60 -c 你最好在一分钟之内想到解决的办法，要不然就等着关机吧
嘿嘿
我先来分析下这段命令的意思：shutdown是关机命令。
-r 意思是重启，如果要使对方关机就用-s。
-t 60 是关机时间为60秒。
-c 是你要给对方的警告内容。
记得空格要区分好。
然后另存为.bat 或者.cmd就可以了。
我们先运行一下试试看。
vbs代码大全
哈哈，LS的比较搞笑VBS：学VB的，据说VB和VBS差不了多少，只是VBS没有主而已，VB对网络的支持堪称，所以不少的盗号程序都选择用VB来编写，但是其代码量绝对不是我们可以在百度贴出来的，而且......等等，总之，代码贴出来是不可能了再说代码：LS的你别嫌他的少，他这个是无毒无害，对于对操作系统不通的童鞋来说是挺管用的如果你觉得太少，就把这个文件在注册表里做成启动项，让它开机就启动，呵呵如果不够你的意，就这样改：Msgbox 您的系统已遭病毒破坏，系统5秒后将自动关机关机，请在关机后24小时重新启动。
,16+4096,Windows安全警报 Shell cmd\\\/c shutdown -s -t 5佛祖曰：普度众生，这样就行后面那一句代码是用来关机的，VBS代码你应该会插入把创建个文本文档输入代码改后缀.txt为.vbs双击运行即可\ \ vbs的共计4个：vbs[医][=ventilating bronchoscope]通气支气管Visual BASIC 脚言vbscript vb脚本visual basic script 可视BASIC语言脚本
