灵活实用VBS入门教程应用篇
作者 佚名
来源 ASP编程
浏览
发布时间 2013-07-09
上一篇文章我们了解了VBS编程的一些基础知识,要更深入地学习还要学习选择结构和循环结构。 选择结构 选择结构,即是对条件进行判断,然后根据判断的结果,选择执行不同的分支的结构。常见的有IF条件语句和SelectCase语句。 ●IF条件语句 IF条件语句又有多种具体的形式,如If…Then、If…Then…Else、If…Then…ElseIf。下面分别用例程来说明。用笔记本编写一个如下内容的VBS脚本: dima,b a=inputbox("输入第一个数字","输入") b=inputbox("输入第二个数字","输入") ifa>bthen MsgBox("第一个数大于第二个数") Endif 运行后,要求用户输入两个数字,第一个数字的值赋给a,第二个数字的值赋给b,然后程序自动判断a和b,如果a的值大于b的值,就弹出信息提示框,显示“第一个数大于第二个数”。注意:then后面的语句不与then在同一行时,判断语句结束后要加一行Endif来结束,否则程序会结束。如果是同一行的就不用再加上Endif了,如上面的语句可改为: dima,b a=inputbox("输入第一个数字","输入") b=inputbox("输入第二个数字","输入") ifa>bthenMsgBox("第一个数大于第二个数") 另外一个程序中可以用多个If语句,我们可以把上面的程序完善一下如下: dima,b a=inputbox("输入第一个数字","输入") b=inputbox("输入第二个数字","输入") Ifa>bthen MsgBox("第一个数大于第二个数") Endif Ifa=bthen MsgBox(“第一个数等于第二个数”) Endif Ifa<bthen MsgBox(“第一个数小于第二个数”) Endif 我们也可以再换用IF的其它语句If…Then…Else和If…Then….Elseif来实现相同的作用,如下: dima,b a=inputbox("输入第一个数字","输入") b=inputbox("输入第二个数字","输入") Ifa>bthen MsgBox("第一个数大于第二个数") Else IFa=bthen MsgBox(“第一个数等于第二个数”) Else MsgBox(“第一个数小于第二个数”) Endif Endif ―――――――――――――――――――――――――――――――――――――― dima,b a=inputbox("输入第一个数字","输入") b=inputbox("输入第二个数字","输入") Ifa>bthen MsgBox("第一个数大于第二个数") Elseifa=bthen MsgBox(“第一个数等于第二个数”) Else MsgBox(“第一个数小于第二个数”) Endif ●SelectCase语句 SelectCase语句是多分支结构的另一种表示形式,它具有表示直观的特点,结构简单,不容易导致混乱,它的语法形式如下: SelectCase变量或表达式 Case表达式1 语句1 Case表达式2 语句2 EndSelect 现在我们用SelectCase语句来写一个数字转换成英文的程序,体验一下SelectCase的优点,Let''sgo!!! dima a=inputbox("输入一个数字","输入") SelectCasea Case1 MsgBox("你输入的数英文是One") Case2 MsgBox("你输入的数英文是Two") Case3 MsgBox("你输入的数英文是Tree") Case4 MsgBox("你输入的数英文是Four") EndSelect 从上面,是不是觉得SelectCase语句很直观呢,如果用If语句的话,肯定会很混乱,甚至会把人都给看晕了。还要注意的是无论是条件语句有多少个分支,只要一个分支执行了,其余的分支就不再执行。 循环结构 ●For循环语句 For语句是用来控制循环次数已知的循环结构的,语句如下: For循环变量=初值To终值[步长] 语句 [Exitfor]''退出循环语句 Next 现在我们编写一个计算从1 |
凌众科技专业提供服务器租用、服务器托管、企业邮局、虚拟主机等服务,公司网站:http://www.lingzhong.cn 为了给广大客户了解更多的技术信息,本技术文章收集来源于网络,凌众科技尊重文章作者的版权,如果有涉及你的版权有必要删除你的文章,请和我们联系。以上信息与文章正文是不可分割的一部分,如果您要转载本文章,请保留以上信息,谢谢! |
你可能对下面的文章感兴趣
关于灵活实用VBS入门教程应用篇的所有评论