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

