VB.Net巢狀Select Case語句

可以將select語句作為外部select語句的語句序列的一部分。即使內部和外部選擇的情況常數包含共同的值，也不會產生衝突。

範例

Module decisions
   Sub Main()
      'local variable definition'
      Dim a As Integer = 100
      Dim b As Integer = 200
      Select a
          Case 100
              Console.WriteLine("This is part of outer case ")
              Select Case b
                  Case 200
                      Console.WriteLine("This is part of inner case ")
              End Select
      End Select
      Console.WriteLine("Exact value of a is : {0}", a)
      Console.WriteLine("Exact value of b is : {0}", b)
      Console.ReadLine()
   End Sub
End Module

執行上面範例程式碼，得到以下結果 -

This is part of outer case
This is part of inner case
Exact value of a is : 100
Exact value of b is : 200