vbs恶搞小程序速成
今天我们来教大家一些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恶搞小程序速成相关推荐
- java编写关机恶搞程序,VB关机恶搞小程序
VB关机恶搞小程序一: Dim fs, dirwin, c,Wll, str,strr,r Set fs = CreateObject("Scripting.FileSystemObject ...
- w ndows恶搞,Windows 记事本编写恶搞小程序
Windows 记事本编写恶搞小程序 这时我第一次写文章,如果哪里有错误,希望能给我指正出来. 1.炸弹弹窗 2.我是猪 3.打开什么程序都关闭 1.代码是: :start start cmd got ...
- 王思聪吃热狗的c语言小程序,王思聪吃热狗火了,开发各种恶搞小程序!王校长:我不要面子的啊...
原标题:王思聪吃热狗火了,开发各种恶搞小程序!王校长:我不要面子的啊 近日王校长上了不少次热搜,其中有一条就是王校长吃热狗火了,接下来就出现了各种各样的表情包,手机壳,素描等等.其实这些还不是最火爆的 ...
- 让人绝望的C语言恶搞小程序,网友:生无可恋!
今天给大家介绍两个好东西,就是利用C语言编写的两个恶搞小程序,有多厉害,只有你自己去试试了, 下面是小编整理好的一套C/C++资料,加小编C/C++编程学习群:825414254,获取系统性学习C/C ...
- 恶搞小程序:鼠标不受控制+无限弹窗
第一个恶搞小程序,效果可以让鼠标不受控制,并且无限打开命令窗口 #include<windows.h> #include<stdio.h> #include<stdlib ...
- java恶作剧小程序_一个Java恶搞小程序
运用Java程序控制某个应用程序的运行(以网易云音乐为例),步骤如下 1.建立bat文件分别是start.bat(控制程序的运行)和kill.bat(控制程序的结束): start.bat 的内容如下 ...
- python恶搞小程序-知道了这个,你也能写出 Python 趣味小程序
原标题:知道了这个,你也能写出 Python 趣味小程序 前两天在 51CTO 看见某篇推荐博文,大概是一个 豆子比较感兴趣,在知乎和 github 上搜索了相关的源代码,发现原来实现起来非常的简单, ...
- python恶搞小程序-有趣的python小程序
有趣的python小程序 1.密码生成器x=int(input()) print(''.join(__import__('random').choice('QWERTYUIOPASDFGHJKLZXC ...
- 一些恶搞小程序,整蛊必备
第一个:让别人内存OVER(逼他重启) @echo off start cmd %0 就这3行了 打开"开始→程序→附件→记事本",把代码部分复制进去,点"另存为&quo ...
最新文章
- 极路由为何获MTK临幸?
- APUE读书笔记 之 进程关系
- 深度 | 阿里云蒋江伟:什么是真正的云原生?
- ubuntu下搭载LNMP环境,解决 fpm监听失败
- Invalid argument: Key: label. Data types don't match. Data type: int64 but expected type: float
- EasyExcel入门使用
- Pytorch——可视化不同的优化器效果
- php跳转方式带rere_PHP利用REFERER根居访问来地址进行页面跳转
- cocos2d0基础篇笔记二
- 人脸识别系统 讲解以及环境搭建(Java 附源码)
- WebMagic抓取阿里司法拍卖信息
- ART中 MIR -- LIR -- 机器码 的流程
- mysql 定时调用sp_使用shell脚本调用mysql数据库存储过程,并设置定时任务
- 运动想象EEG背景知识
- WSL挂载移动硬盘U盘
- 初探深度优化搜索--小白版
- R语言绘制沈阳地铁线路图
- Java 之 Serializable 序列化和反序列化的概念,作用的通俗易懂的解释【转】
- CANoe-CAN通信
- “全球发布——主流声音 · 最强路径”在深落幕 引领主流生态融合新模式