VB.Net Select Case语句

Select Case语句允许对一个变量进行相对于值列表的测试。每个值都被称为一个情况(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：表示表达式匹配值的表达式子句列表。多个表达式子句用逗号分隔。
• statements：如果选择表达式匹配Case expressionlist中的任何子句，则运行该语句。
• elsestatements： 如果选择表达式不匹配任何Case语句的表达式列表中的任何子句，则Case Else后面的语句将会运行。

流程图

示例

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