VB.net 2010 视频教程 VB.net 2010 视频教程 python基础视频教程
SQL Server 2008 视频教程 c#入门经典教程 Visual Basic从门到精通视频教程
当前位置:
首页 > 编程开发 > vb >

  • 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 教程 目录
————————————————
版权声明：本文为CSDN博主「VB.Net」的原创文章，遵循CC 4.0 BY-SA版权协议，转载请附上原文出处链接及本声明。
原文链接：https://blog.csdn.net/uruseibest/article/details/63686088

相关教程