vb.net 教程 2-8 流程控制:跳转语句GOTO

前端之家收集整理的这篇文章主要介绍了vb.net 教程 2-8 流程控制:跳转语句GOTO前端之家小编觉得挺不错的,现在分享给大家,也给大家做个参考。

执行GOTO语句将无条件地跳转到过程内的标签所在代码
需要注意的是:由于GoTo的跳转使代码具有不确定性,而且阅读和维护会变得更加困难,应该尽可能的减少使用。

看以下代码输出0-100,但是当等于5时,结束输出

    Sub main()
        For i As Integer = 0 To 100
            Console.WriteLine(i)
            If i = 5 Then GoTo equal5
        Next
        Console.ReadKey()
        Exit Sub

equal5:
        Console.WriteLine("已经跳转")
        Console.ReadKey()
    End Sub

我们定义了一个标签:equal5,当i=5时就跳转到此处的代码,不再继续输出数字。运行如下:

再继续看以下代码

    Sub Main()
        Dim i As Integer
        Console.WriteLine("请输入一个数字")
        i = CType(Console.ReadLine,Integer)

        Select Case i
            Case 0
                GoTo statements0
            Case 1
                GoTo statements1
            Case Else
                GoTo statementselse
        End Select

statements0:
        Console.WriteLine("输入数据为0")

statements1:
        Console.WriteLine("输入数据为1")

statementselse:
        Console.WriteLine("输入数据为其他")

        Console.ReadKey()
    End Sub
运行时如下:
可以看到并不是我们所希望的输出修改代码如下:
    Sub Main()
        Dim i As Integer
        Console.WriteLine("请输入一个数字")
        i = CType(Console.ReadLine,Integer)

        Select Case i
            Case 0
                GoTo statements0
            Case 1
                GoTo statements1
            Case Else
                GoTo statementselse
        End Select

statements0:
        Console.WriteLine("输入数据为0")
        GoTo endsub
statements1:
        Console.WriteLine("输入数据为1")
        GoTo endsub
statementselse:
        Console.WriteLine("输入数据为其他")
        GoTo endsub
endsub:
        Console.ReadKey()
    End Sub


由于.net平台下C#和vb.NET很相似,本文也可以为C#爱好者提供参考。

学习更多vb.net知识,请参看 vb.net 教程 目录

原文链接:https://www.f2er.com/vb/256735.html

猜你在找的VB相关文章