VB编程之Select Case语句

本文介绍VB中一种选择结构——Slect Case语句。

Select Case语句也称为情况语句，是多分支结构的另一种表示形式。语句格式如下：

Select Case语句的功能是首先计算<测试表达式>的值，然后用计算结果从前到后依次与每个Case子句的<表达式列表>的值进行比较。如果匹配成功，则执行该Case子句后的语句块，然后执行End Select语句。如果没有匹配的，且存在Case Else语句则执行Case Else子句后的语句块n+1，然后执行End Select语句。

<表达式列表>有4种形式：

1，表达式

如：Case 5 或 Case "a"

2，表达式1 To 表达式2

Case 1 to Case 20或Case "A" to "Z"

3，Is关系运算符表达式

如：Case Is<60

4，用逗号分隔的以上3种形式的列表

如：Case 1 to3,10 to 15 ,6,9,Is>100

说明：

To用来指定一个范围，必须将小的值写在前面，而大的值写的后面

Is及后面的关系运算符和表达式来指定一个数值范围。如Is>50 ，但是不能用两个或多个组合在一起，例如Case Is>10 And Is<20,这是错误的表达形式Select Case语句与If语句功能类型，一般情况下可以相互替换。

举例：

要求：编程求指定某年某月的天数。如下图所示;

分析：月份天数有3种情况，即31天、30天、29天或28天。第3种情况与是否为闰年有关，闰年的2月为29天，非闰年的2月为28天。闰年是能被4整除但不能被100整除的年（如2004年），或者能被400整除的年（如2000年）。

步骤一：按照上图设计程序界面。

步骤二：添加代码，如下所示

步骤三：

测试效果，输入年份和月份后，单击求天数按钮即可计算出该月的天数。