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