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

版权声明:本文为博主原创文章,转载请显著位置标明出处,未经博主允许不得用于商业目的。 https://blog.csdn.net/UruseiBest/article/details/63686088

流程控制的选择语句使用的是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 教程 目录



阅读更多

没有更多推荐了,返回首页