vb.net 教程 2-2 流程控制:选择语句

版权声明：本文为博主原创文章，转载请在显著位置标明本文出处以及作者网名，未经作者允许不得用于商业目的。
流程控制的选择语句使用的是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 教程 目录