打印本文 打印本文  关闭窗口 关闭窗口  
VBA编程中的SelectCase语句
作者:佚名  文章来源:不详  点击数  更新时间:2008/4/18 14:54:57  文章录入:杜斌  责任编辑:杜斌

  从上面的例予可以看出,如果条件复杂,分支太多,使用If语句就会显得累赘,而且程序也将变得不易阅读。这时可使用Select Case语句来写出结构清晰的程序。 

  Select case语句可根据表达式的求值结果,选择执行几个分支中的一个分支。其语法如下:
 
  Select Case<检验表达式> 
  [(;ase<比较列表1>] 
   [<语句l>]] 
  [case Else 
  [<语句n>]] 
  End Select 

  (1)检验表达式必要参数,可为任何数值表达式或字符串表达式。 

  (2)比较列表1  若有case出现,则为必要参数。它是多个“比较元素”的列表,其中可包含“表达式”、“表达式To表达式”、“Is<比较操作符>表达式’’几种形式。 

  如果“比较元素”中含有“To”关键字,则前一个表达式必须小于后一个表达式(对于数值表达式,指的是数值大小;对于字符串表达式,则指排序),且<检验表达式>必须介于两个表达式之间。如果<比较元素>含有“Is”关键字,则“比较操作符’’表达式的值必须为真。 

  (3)语句1~n可包含一条或多条语句。 
  如果有一个以上的Case子句与“检验表达式”匹配,则VBA只执行第一个匹配的Case后面的“语句”。如果前面的case子句与<检验表达式>都不匹配,则执行Case Else子句中的语句n。
打印本文 打印本文  关闭窗口 关闭窗口