-
VBS基础篇 - 条件语句(if与Select Case)
经常地,当我们编写代码时,我们需要根据不同的判断执行不同操作,我们可以使用条件语句完成这个工作,asp中的条件语句主要是if与Select Case这里就为大家介绍一下,需要的朋友可以参考下
If...Then...Else
在下面的情况中,您可以使用 If...Then...Else 语句:
在条件为 true 时,执行某段代码
选择两段代码之一来执行时
dim a '定义一个变量
a = 100
if a < 200 then a = 300 '若i<200,则对i重新赋值
msgbox a '输出的值为300
要运行多行代码,必须使用多行(或块)语法,多行(或块)语法包含 End If 语句
dim a,b,c
a=inputbox("请输入a的值:")
b=100
c=200
if a<200 then '条件为 True 时运行某一语句块,条件为 False 时运行另一语句块
msgbox b
else
msgbox c
end if
对多个条件进行判断,可以添加任意多个 ElseIf 子句以提供多种选择
dim a
a=inputbox("请输入a的值:")
if a<200 then '条件为 True 时运行某一语句块,条件为 False 时运行另一语句块
msgbox "执行语句1"
elseif a=200 then
msgbox "执行语句2"
elseif a>200 then
msgbox "执行语句3"
end if
Select Case结构提供了 If...Then...ElseIf结构的一个变通形式,可以从多个语句块中选择执行其中的一个。Select Case语句提供的功能与 If...Then...Else语句类似,但是可以使代码更加简练易读。
'Select Case 结构在其开始处使用一个只计算一次的简单测试表达式。表达式的结果将与结构中每个 Case 的值比较,如果匹配,则执行与该Case 关联的语句块。
dim a
a=inputbox("随便填写一个数")
a=int(a)
select case a
case 6,7,8,9 msgbox("还行")
case 10,11,12,13,14,15 msgbox("一般")
case 16,17,18,19,20 msgbox("可以了")
case 21,22,23,24,25 msgbox("无敌了")
case else msgbox("做梦呢")
end select
注意: Select Case结构只计算开始处的一个表达式(只计算一次),而 If...Then...ElseIf 结构计算每个 ElseIf 语句的表达式,这些表达式可以各不相同。仅当每个 ElseIf 语句计算的表达式都相同时,才可以使用 Select Case 结构代替If...Then...ElseIf 结构。
原文链接:http://www.cnblogs.com/wakey/p/5738489.html
栏目列表
最新更新
vbscript基础篇 - vbs数组Array的定义与使用方
vbscript基础篇 - vbs变量定义与使用方法
vbs能调用的系统对象小结
vbscript网页模拟登录效果代码
VBScript 根据IE窗口的标题输出ESC
杀死指定进程名称的小VBS
通过vbs修改以点结尾的文件的属性为隐藏
查询电脑开关机时间的vbs代码
VBA中的Timer函数用法
ComboBox 控件的用法教程
SQL SERVER中递归
2个场景实例讲解GaussDB(DWS)基表统计信息估
常用的 SQL Server 关键字及其含义
动手分析SQL Server中的事务中使用的锁
openGauss内核分析:SQL by pass & 经典执行
一招教你如何高效批量导入与更新数据
天天写SQL,这些神奇的特性你知道吗?
openGauss内核分析:执行计划生成
[IM002]Navicat ODBC驱动器管理器 未发现数据
初入Sql Server 之 存储过程的简单使用
uniapp/H5 获取手机桌面壁纸 (静态壁纸)
[前端] DNS解析与优化
为什么在js中需要添加addEventListener()?
JS模块化系统
js通过Object.defineProperty() 定义和控制对象
这是目前我见过最好的跨域解决方案!
减少回流与重绘
减少回流与重绘
如何使用KrpanoToolJS在浏览器切图
performance.now() 与 Date.now() 对比