一个贼简单的代码表白

一个贼简单的代码表白前一阵网上挺火的各种表白代码,自己学着也做了一个记事本编写,后缀改为vbs就能运行了。(其中有一串代码会关机的呦,我是WIN10系统)setws=createobject(“wscript.shell”)ws.run”cmd.exe/cshutdown-s-f-t0″哈哈知道三号女生是什么梗吗?(来源于文松的一个小品,那个老弟啊姐给你爆灯的那个!!嗯哼)就是…

大家好,又见面了,我是你们的朋友全栈君。

前一阵网上挺火的各种表白代码,
自己学着也做了一个 记事本编写,后缀改为vbs 就能运行了。
(文章最后边有个百度云盘链接,可以直接下载。或者去我上传的资源也能免费下载)

在这里插入图片描述
在这里插入图片描述
(其中有一串代码会关机的呦,我是WIN10系统)
set ws=createobject(“wscript.shell”)
ws.run”cmd.exe /c shutdown -s -f -t 0″
在这里插入图片描述
哈哈 知道三号女生是什么梗吗? (来源于文松的一个小品,那个老弟啊姐给你爆灯的那个!!嗯哼)
就是注意一下代码中符号必须是英文的哦! 要不可麻烦了。
源码:

x=msgbox("做我女朋友好不好",VbYesNo)
if x=VbYes then
msgbox("明天就去领证吧!")
msgbox("记得来找我。")
elseif x=VbNo then
  x=msgbox("房产证写你名字",VbYesNo)
  if x=VbYes then
  msgbox("明天就去领证吧!")
  msgbox("记得来找我。")
     elseif x=VbNo then
     x=msgbox("保大...",VbYesNo)
          if x=VbYes then
          msgbox("明天就去领证吧!")
          msgbox("记得来找我。")
          elseif x=VbNo then
          x=msgbox("我妈会游泳",VbYesNo)
          if x=VbYes then
          msgbox("明天就去领证吧!")
          msgbox("记得来找我。")
elseif x=VbNo then
msgbox("你真的不爱我吗?") 
msgbox("那好吧。") 
msgbox("那你就关机吧") 
msgbox("真的哟!") 
msgbox("都怪我太善良,再给你一次机会") 
x=msgbox("你后悔吗?",VbYesNo)
if x=VbYes then
          msgbox("后悔就不给你关机了,3号女生!")
elseif x=VbNo then
          msgbox("宁死不屈在下佩服,拜拜。")
set ws=createobject("wscript.shell")
ws.run"cmd.exe /c shutdown -s -f -t 0"
End if
End if
End if
End if
End if

链接:https://pan.baidu.com/s/1r8UemUbkRaFxIdSbVaRYRg
提取码:8qd4
复制这段内容后打开百度网盘手机App,操作更方便哦

版权声明:本文内容由互联网用户自发贡献,该文观点仅代表作者本人。本站仅提供信息存储空间服务,不拥有所有权,不承担相关法律责任。如发现本站有涉嫌侵权/违法违规的内容, 请发送邮件至 举报,一经查实,本站将立刻删除。

发布者:全栈程序员-用户IM,转载请注明出处:https://javaforall.cn/138906.html原文链接:https://javaforall.cn

【正版授权,激活自己账号】: Jetbrains全家桶Ide使用,1年售后保障,每天仅需1毛

【官方授权 正版激活】: 官方授权 正版激活 支持Jetbrains家族下所有IDE 使用个人JB账号...

(0)
blank

相关推荐

  • 使用 Laravel-Excel 进行 CSV/EXCEL 文件读写

    使用 Laravel-Excel 进行 CSV/EXCEL 文件读写

    2021年10月24日
  • 基于SSM框架的网上购物商城及电商后台管理系统

    基于SSM框架的网上购物商城及电商后台管理系统基于SSM框架的网上购物商城及电商后台管理系一、开发环境操作环境:Windows10开发工具:IDEA数据库:MySQL服务器:TomCat二、系统功能介绍前台商城功能注册登录:用户首先要填写相关信息,注册为会员。修改个人信息:用户登录后可以修改个人信息。查看公告和留言反馈网站:用户可查看公告,登录后可以给网站留言反馈网站问题。浏览商品:会员浏览网上商城,可以根据分类检索、关键字检索、热销商品和折扣商品浏览商品和商品信息及评价。管理购物车:登录后会员可以将想购买的商品加入购物

  • pycharm中安装opencv_pycharm安装opencv库出错

    pycharm中安装opencv_pycharm安装opencv库出错Pycharm安装opencv的几种方法之前在默认环境中用pip安装过一次opencv,当时就是参考比人方法弄,稀里糊涂的,然后今天想在自己别的环境下(tensorflow)下安装终于弄懂了一些,暂时发现了几种安装的方法,特此记录下。方法1:在Pycharm自带的库中下载(暂且这么叫吧,如下图)这个方法我也是看别人说的,自己还没试过,描述也没介绍版本啥的,所以个人也不推荐…方法2:就是…

  • vim不能复制粘贴_在筛选状态下怎么复制粘贴

    vim不能复制粘贴_在筛选状态下怎么复制粘贴前言这是一则记录贴,防止小技巧遗忘。不知道大家是否会有这种困扰,例如在AndroidStudio有一段缩进优美的代码实现,例如:publicvoidsayHello(){Stringmsg=”HelloVimPasteMode”;System.out.println(msg);}当你把这段缩进优美的代码直接ctrl+c,ctrl+v到Vim的时候,就会出现如

  • VBScript教程-第二章. 运行脚本

    VBScript教程-第二章. 运行脚本因为过年,一直没有更新教程.发现按照这个进度得下个世纪能完成我这宏伟的小计划,所以最近我会加快进度.好多人问我学习方法,其实真的是学习没有捷径.最后说一句,学习脚本最好准备一份帮助文档,vbs就下载script56.chm这个文件就行了.=========================万恶的分割线后开始正题=====================…

  • pycharm安装包时的那些事

    pycharm安装包时的那些事1.查找是否有.condarc文件.condarc以点开头,一般表示conda应用程序的配置文件,在用户的家目录windows:C:\users\username\linux:/home/username/问题一:无法找到condarc文件#创建condarc文件condaconfig–addchannelsr2.设置清华源#注意是http,不是https,以下是在命令行的代码,也可以直接在.condarc文件中修改condaconfig–add

发表回复

您的电子邮箱地址不会被公开。

关注全栈程序员社区公众号