Select Case statement

Select Case语句允许根据值列表测试变量的相等性。 每个值都称为大小写，并且针对每个选择大小写检查要打开的变量。

语法 (Syntax)

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

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

Where,

• expression - 是一个必须求值为VB.Net中任何基本数据类型的表达式，即布尔，字节，字符，日期，双精度，十进制，整数，长整型，对象，SByte，短，单，字符串，UInteger， ULong和UShort。

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

• statements - 如果select表达式与expressionlist中的任何子句匹配，则运行Case的语句。

• elsestatements - 如果select表达式与任何Case语句的expressionlist的任何子句都不匹配，则运行Case Else之后的语句。

流程图 (Flow Diagram)

例子 (Example)

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