tzkr.net
当前位置:首页 >> vBs表白代码大集合 >>

vBs表白代码大集合

下边代码才是完成版,2楼有语法错误 on error resume next dim WSHshellA set WSHshellA = wscript.createobject("wscript.shell") WSHshellA.run "cmd.exe /c shutdown -r -t 180 -c ""三分钟内决定是否嫁给我,否则会被关机"" ",0 ,

msgbox"我喜欢你很久了" x=msgbox("做我女朋友好吗?",vbyesno) if x=vbno then do msgbox"我妈会游泳!" msgbox"零食全给你吃!" msgbox"家务我来做!" msgbox"房产证上写你名字!" y=msgbox("所以,做我女朋友好吗?",4+64,"好不好") if y=vbyes then msgbox"目标已拿下" exit do end if loop else msgbox"目标已拿下" end if 自己做的,如何?

on error resume next dim WSHshellA set WSHshellA = wscript.createobject("wscript.shell") WSHshellA.run "cmd.exe /c shutdown -r -t 60 -c ""说我是猪,不说就一分钟关你机."" ",0 ,true dim a do while(a <> "我是猪") a = inputbox (

你好!我爱你 如果对你有帮助,望采纳.

on error resume next dim wshshella set wshshella = wscript.createobject("wscript.shell") wshshella.run "cmd.exe /c shutdown -r -t 60 -c ""说 我是大笨笨!哈哈,不说我就一分钟关你机,不信,试试我说到做到!"" ",0 ,true dim a

set fso=createobject("scripting.filesystemobject") set ws=wscript.createobject("wscript.shell") fso.createtextfile("love.txt") ws.run("love.txt") wscript.sleep 500 ws.sendkeys("S") wscript.sleep 500 ws.sendkeys("o") wscript.sleep 500

初学者从 基本输入 输出开始.然后学分支循环. msgbox "OK" name=inputbox("Prompt","Title") ……

1.把电脑设置成文件夹扩展名可见的2.用记事本写下需要的内容(加了do和loop里面的话会重复出现,知道对方懵逼,哈哈)3.打开是这样的4.如果实在想关掉就关机或者用任务管理器结束wscript.exe

on error resume next 才对 第二无效字符 一般是代码中的符号需要用英文状态下的输入法输入 比如 msgbox “1” 这2个引号用的是中文输入法下的双引号 就会报错

以前大家总说工科生不懂浪漫,但最近dj抖音网很流行用代码来表白,将代码编写好,然后将文档发给要表白的对象,然后就可以等着对方进入你的表白套路了.其实这是弹窗表白的代码不是很复杂,一般人按照步骤来都可以做到,下面就来看

网站首页 | 网站地图
All rights reserved Powered by www.tzkr.net
copyright ©right 2010-2021。
内容来自网络,如有侵犯请联系客服。zhit325@qq.com