版权声明:本文为博主原创文章,转载请在显著位置标明本文出处以及作者网名,未经作者允许不得用于商业目的。
流程控制的选择语句使用的是Select Case 语句
以 Select Case 开头,以End Select 结尾,其中有一个或多个 Case 和匹配值,如果匹配就执行该Case 下面的语句块。
基本形式如下:
Select Case 表达式(此表达式的计算结果必须为某个基本数据类型)
Case 匹配值1
处理语句块1
Case 匹配值2
处理语句块2
......
处理语句块n
Case Else
处理语句块n+1
End Select
可以在每个 Case 子句中使用多个表达式或范围:
Case 1 To 4, 7 To 9, 11, 13, Is > maxNumber
例如:
Sub Main()
Dim s As String
Console.WriteLine("选择 a、b、c 方案")
s = Console.ReadLine()
Select Case s
Case "a"
Console.WriteLine("选择了 a号 方案")
Case "b"
Console.WriteLine("选择了 b号 方案")
Case "c"
Console.WriteLine("选择了 c号 方案")
Case Else
Console.WriteLine("选择了 其他 方案")
End Select
Console.ReadKey()
End Sub
运行结果:
第二个例子,case 后面接判断
Sub Main()
Dim a As Integer = 0
Select Case a
Case < 0
Console.WriteLine("a小于0")
Case = 0
Console.WriteLine("a等于0")
Case > 0
Console.WriteLine("a大于0")
End Select
Console.ReadKey()
End Sub
结果:
第三个例子,case后面多个值
Sub Main()
Dim a As Integer = 12
Select Case a
Case 1, 2, 3
Console.WriteLine("第1季度")
Case 4, 5, 6
Console.WriteLine("第2季度")
Case 7, 8, 9
Console.WriteLine("第3季度")
Case 10, 11, 12
Console.WriteLine("第4季度")
End Select
Console.ReadKey()
End Sub
结果:
由于.net平台下C#和vb.NET很相似,本文也可以为C#爱好者提供参考。
学习更多vb.net知识,请参看 vb.net 教程 目录