VB.Net - 嵌套 Select Case 语句
可以将 select 语句作为外部 select 语句的语句序列的一部分。 即使内部和外部 select 的 case 常量包含共同的值,也不会发生冲突。
示例
Module decisions Sub Main() '局部变量定义 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