VB.Net - Select Case 语句

Select Case 语句允许将变量与其值列表进行比较。每个值称为一个 case，并且正在切换的变量将针对每个 select case 进行检查。

语法

VB.Net 中 Select Case 语句的语法如下：

Select [ Case ] expression
   [ Case expressionlist
      [ statements ] ]
   [ Case Else
      [ elsestatements ] ]
End Select

其中，

• expression − 是一个表达式，必须计算为 VB.Net 中的任何基本数据类型，即 Boolean、Byte、Char、Date、Double、Decimal、Integer、Long、Object、SByte、Short、Single、String、UInteger、ULong 和 UShort。

• expressionlist − 表示expression匹配值的表达式子句列表。多个表达式子句用逗号分隔。

• statements − Case 后面的语句，如果 select 表达式与expressionlist中的任何子句匹配，则执行这些语句。

• elsestatements − Case Else 后面的语句，如果 select 表达式与任何 Case 语句的expressionlist中的任何子句都不匹配，则执行这些语句。

流程图

示例

Module decisions
   Sub Main()
      'local variable definition
      Dim grade As Char
      grade = "B"
      Select grade
          Case "A"
              Console.WriteLine("Excellent!")
          Case "B", "C"
              Console.WriteLine("Well done")
          Case "D"
              Console.WriteLine("You passed")
          Case "F"
              Console.WriteLine("Better try again")
          Case Else
              Console.WriteLine("Invalid grade")
      End Select
      Console.WriteLine("Your grade is  {0}", grade)
      Console.ReadLine()
   End Sub
End Module

编译并执行上述代码后，将产生以下结果：

Well done
Your grade is B