如何在VBS基础篇中使用条件语句

如何在VBS基础篇中使用条件语句？很多新手对此不是很清楚，为了帮助大家解决这个难题，下面小编将为大家详细讲解，有这方面需求的人可以来学习下，希望你能有所收获。

在条件为 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

看完上述内容是否对您有帮助呢？如果还想对相关知识有进一步的了解或阅读更多相关文章，请关注亿速云行业资讯频道，感谢您对亿速云的支持。