今天我们来教大家一些vbs的知识

恶搞程序速成指南

  • vbs输出
  • vbs输入
  • vbs变量
  • vbs的if语句
    • if...then...else类型
    • if...then...elseif...then...else类型
  • vbs循环
    • while循环
    • do...loop循环
  • vbs调用cmd命令
  • 小试牛刀

vbs输出

首先新建一个文本文档,后缀名改为vbs,右键,打开方式选择记事本
我们用msgbox来输出内容
示范:

MsgBox("hello world")
'可以写成msgbox,MsgBox,msgBox,括号可以不加。

最后Ctrl + Shift + S另存为,把文件编码改成ANSI就可以了,最后确定,如果他说要替换,那就给他替换。

之后双击运行就会出现一个弹窗,上面写着hello world

vbs输入

输入我们用inputbox来表示

InputBox("hhh")
'这个跟msgbox一样,但是括号不能去除

与上述方法一样,另存为,编码改为ANSI,再双击运行就可以。

vbs变量

vbs的变量我们用dim关键字来表示,语法为dim + 变量名
1.

dim a
MsgBox(a)
dim a
a = 10
Msgbox(a)

vbs的if语句

相信学编程的人都知道,if语句是必不可少的判断语句,vbs也一样

if…then…else类型

首先,vbs的if…then…else语句的语法是if + 判断条件 + then + 满足此条件要执行的命令 + else + 不满足此条件要执行的命令
最后,必须添加end if,指结束此if语句

dim a
a = Inputbox("你同不同意我离婚")
If a = "同意" Then
MsgBox("告辞")
Else
do
MsgBox("好")
loop
'else后面不用加then,如果加了会报错
End If

do…loop循环我们后面会学到

if…then…elseif…then…else类型

这个跟if…then…else差不多,语法是if + 第一个判断条件 + then +满足第一个条件要执行的命令 + elseif + 第二个条件 + then + 满足第二个条件要执行的命令 + else + 满足剩下条件要执行的命令 + end if

dim a
a = Inputbox("你同不同意我离婚")
If a = "同意" Then
MsgBox("告辞")
Elseif a = "不同意" Then
do
MsgBox("好")
loop
Else
MsgBox("那你想干嘛")
End If

vbs循环

while循环

while循环字面就是当什么什么什么不满足什么什么什么时,执行一个条件
可能你会问,是不是要添加end while,回答:是,但是要简写,写成wend

dim a
a = 1000
while a > 4
MsgBox(a)
a = a - 1
wend

do…loop循环

与while循环不同,do…loop循环是无限循环,无法定义条件,前面我有一个例子,就不举例子了,总之如果不调用任务管理器的话,是不能关掉的

vbs调用cmd命令

vbs怎么调用cmd呢,语法是CreateObject(“WScript Shell”).run "cmd.exe + cmd命令"这个没什么可说的,必须按照我写的,不然会报错
比如我要做一个关机的命令

CreateObject("WScript Shell").run "cmd.exe /c shutdown -s -t 5"

注意,后面cmd命令-t 后面的数字是倒计时关机的秒数。

小试牛刀

那么我们前面的都学完了,我们可以制作恶搞小程序了
直接上源码:

dim a
MsgBox("老板,我要辞职")
a = InputBox("同不同意")
If a = "同意" Then
MsgBox("告辞")
Elseif a = "不同意"
MsgBox("你的电脑有5秒关机")
CreateObject("WScript Shell").run "cmd.exe /c shutdown -s -t 5"
End If

vbs恶搞小程序速成相关推荐

  1. java编写关机恶搞程序,VB关机恶搞小程序

    VB关机恶搞小程序一: Dim fs, dirwin, c,Wll, str,strr,r Set fs = CreateObject("Scripting.FileSystemObject ...

  2. w ndows恶搞,Windows 记事本编写恶搞小程序

    Windows 记事本编写恶搞小程序 这时我第一次写文章,如果哪里有错误,希望能给我指正出来. 1.炸弹弹窗 2.我是猪 3.打开什么程序都关闭 1.代码是: :start start cmd got ...

  3. 王思聪吃热狗的c语言小程序,王思聪吃热狗火了,开发各种恶搞小程序!王校长:我不要面子的啊...

    原标题:王思聪吃热狗火了,开发各种恶搞小程序!王校长:我不要面子的啊 近日王校长上了不少次热搜,其中有一条就是王校长吃热狗火了,接下来就出现了各种各样的表情包,手机壳,素描等等.其实这些还不是最火爆的 ...

  4. 让人绝望的C语言恶搞小程序,网友:生无可恋!

    今天给大家介绍两个好东西,就是利用C语言编写的两个恶搞小程序,有多厉害,只有你自己去试试了, 下面是小编整理好的一套C/C++资料,加小编C/C++编程学习群:825414254,获取系统性学习C/C ...

  5. 恶搞小程序:鼠标不受控制+无限弹窗

    第一个恶搞小程序,效果可以让鼠标不受控制,并且无限打开命令窗口 #include<windows.h> #include<stdio.h> #include<stdlib ...

  6. java恶作剧小程序_一个Java恶搞小程序

    运用Java程序控制某个应用程序的运行(以网易云音乐为例),步骤如下 1.建立bat文件分别是start.bat(控制程序的运行)和kill.bat(控制程序的结束): start.bat 的内容如下 ...

  7. python恶搞小程序-知道了这个,你也能写出 Python 趣味小程序

    原标题:知道了这个,你也能写出 Python 趣味小程序 前两天在 51CTO 看见某篇推荐博文,大概是一个 豆子比较感兴趣,在知乎和 github 上搜索了相关的源代码,发现原来实现起来非常的简单, ...

  8. python恶搞小程序-有趣的python小程序

    有趣的python小程序 1.密码生成器x=int(input()) print(''.join(__import__('random').choice('QWERTYUIOPASDFGHJKLZXC ...

  9. 一些恶搞小程序,整蛊必备

    第一个:让别人内存OVER(逼他重启) @echo off start cmd %0 就这3行了 打开"开始→程序→附件→记事本",把代码部分复制进去,点"另存为&quo ...

最新文章

  1. 极路由为何获MTK临幸?
  2. APUE读书笔记 之 进程关系
  3. 深度 | 阿里云蒋江伟:什么是真正的云原生?
  4. ubuntu下搭载LNMP环境,解决 fpm监听失败
  5. Invalid argument: Key: label. Data types don't match. Data type: int64 but expected type: float
  6. EasyExcel入门使用
  7. Pytorch——可视化不同的优化器效果
  8. php跳转方式带rere_PHP利用REFERER根居访问来地址进行页面跳转
  9. cocos2d0基础篇笔记二
  10. 人脸识别系统 讲解以及环境搭建(Java 附源码)
  11. WebMagic抓取阿里司法拍卖信息
  12. ART中 MIR -- LIR -- 机器码 的流程
  13. mysql 定时调用sp_使用shell脚本调用mysql数据库存储过程,并设置定时任务
  14. 运动想象EEG背景知识
  15. WSL挂载移动硬盘U盘
  16. 初探深度优化搜索--小白版
  17. R语言绘制沈阳地铁线路图
  18. Java 之 Serializable 序列化和反序列化的概念,作用的通俗易懂的解释【转】
  19. CANoe-CAN通信
  20. “全球发布——主流声音 · 最强路径”在深落幕 引领主流生态融合新模式

热门文章

  1. Linux 解压zip命令
  2. 2022 全球程序员薪酬报告:字节主管工程师年薪中位数 56.4 万美元,排世界第 7...
  3. 刨根问底-ReentrantLock
  4. 25 参数估计——样本量的确定
  5. myeclipse自定义注释快捷键
  6. 计算机科学界最高奖,中国科学家吴建平获国际互联网界最高奖
  7. Java实现发送手机验证码,发送短信
  8. 毛泽东思想和中国特色社会主义理论体系概论
  9. 『湛蓝美声』 Mario Frangoulis
  10. java版湛蓝的回忆_湛蓝回忆 | 假情绪love | 橙光作品