vbs基础教程(3)补充

注:本课仅仅是对第三课的补充！

补充

当你的程序要处理很多种不同的判断情况的时候elseif…then会让程序看起来很杂乱, 所以就有了一种select case结构专门对付这种情况。select case的语法结构很简单:
　　select case 变量名
　　　　case 值
　　　　语句
　　　　case 值
　　　　语句
　　　　case else
　　　　语句
　　　 end select
这种结构要用end select来结束语句。我再用大白话说说结构的意思:
开始语句，内容由变量名展开。
如果是变量名第一种可能:
则执行下面的语句
如果是变量名第二种可能:
则执行下面的语句
如果是变量名第n种可能:
则执行下面的语句
否则
执行下面的语句
结束语句
下面举个栗子:

　dim a 
　　a=inputbox("请输入1~3的值") 
　　a=int(a) '处理inputbox返回字符串的问题
　　select case a 
　　case 1 
　　msgbox "壹" 
　　case 2 
　　msgbox "贰" 
　　case 3 
　　msgbox "叁" 
　　case else 
　　msgbox "输入错误" 
　　end select 

如果转换成if语句:

dim a 
　　a=inputbox("请输入1--3的值") 
　　a=int(a) 
　　if a=1 then 
　　msgbox "壹" 
　　else if a=2 then 
　　msgbox "贰" 
　　else if a=3 then 
　　msgbox "叁" 
　　else 
　　msgbox "输入错误" 
　　end if 

这样是不是显得繁琐多了？还是第一种好吧。

作业

把5以内的正整数都转换成中国大写数字

注:下章有大彩蛋！