VBscript脚本(哈尔滨曼哈顿外国语学院)

《VBscript脚本(哈尔滨曼哈顿外国语学院)》由会员上传分享，免费在线阅读，更多相关内容在行业资料-天天文库。

1、3.2VBScript脚本语言3.2.9控制结构1．选择结构（1）单行结构（2）块结构2．多分支结构3.2VBScript脚本语言1.选择结构（1）单行结构：If条件表达式then语句体1[else语句体2]说明：当条件表达式返回值为真（true），则执行then后面的语句体1，否则执行else后面的语句体2Else若省略，则执行if后面的语句。subshowmessagedimx,y,zx=2ifx>0theny=xz=-

2、xelsey=-xz=xendifmsgbox"x的值为"&x&",y的值为"&y&",z的值为"&zendsubcallshowmessage选择结构程序举例3.2VBScript脚本语言1.选择结构（2）块结构If条件表达式1then语句体1elseif条件表达式2then语句体2…else语句体nendif3.2VBScript脚本语言说明：首先测试条件表达式1，如果为true,则执行then后面的语句体1，然后退出块结构。如果条件表达式1结果为false,再测试条件表达式2，依次

3、类推。当找到一个为true的条件时，就执行相应的语句体，然后执行endif后面的语句。如果条件都不为true，那么如果有else，则执行else后面的语句体n，如果没有else，则一个语句也不执行，直接执行endif后面的语句。subshowmessegedimx,yx=inputbox("请输入X的值")ifnotisnumeric(x)thenmsgbox"输入错误，请输入数字"elseifx>0theny=xelsei

4、fx<0theny=-xelsey=0endififisnumeric(x)thenmsgbox"x的值为"&x&",y的值为"¥difendsubcallshowmessege3.2VBScript脚本语言2.多分支结构selectcase测试表达式case表达式1语句体1case表达式2语句体2…caseelse语句体nendselectsubweekdimxx=

5、inputbox("请输入x的值(1-7):")ifnotisnumeric(x)thenx=""selectcasexcase""msgbox"输入错误，请输入数字"case1msgbox"星期一"case2msgbox"星期二"case3msgbox"星期三"case4msgbox"星期四"case5msgbox"星期五"case6msgbox"星期六"case7msgbox"星期日"caseelsemsgbox"请输入1-7中的数字"endselectendsubcallweek3.2VBScr

6、ipt脚本语言2.循环结构（1）for循环（2）do循环（3）while循环（1）for循环for循环变量=初值to终值[step步长]循环体[exitfor]next[循环变量]3.2VBScript脚本语言3.2VBScript脚本语言说明当执行for循环时，先将循环变量设为初值，测试循环条件是否小于（当步长为正）或大于（当步长为负）终值，若是，则执行循环体，否则退出循环，执行for循环后面的语句如果省略step子句，那么默认步长为1

7、bscript>subcycdimi,intsumintsum=0fori=2to100step2intsum=intsum+inextmsgbox"1到100之间的偶数之和为"&intsumendsubcallcyc3.2VBScript脚本语言foreach循环foreach元素in集合语句体next[元素]说明：foreach循环只对数组或者对象集合中的每个元素重复使用一组语句，而不是重复一定的次数，如果不知道一个集合有多少个元素，用foreach循环非常方便。3.2VBScript脚本语言（2

8、）do循环第一种形式：do[while

9、until循环条件]循环体[exitdo]loop第二种形式：do循环体[exitdo]loop