Visual Basic GoTo 语句

GoTo 语句无条件地将程序执行跳转到过程中的指定行(标签处)。

GoTo 语句的语法是:

GoTo label

流程图

实例

Module loops
   Sub Main()
      ' local variable definition '
      Dim a As Integer = 10
Line1:
      Do
          If (a = 15) Then
              ' skip the iteration '
              a = a + 1
              GoTo Line1
          End If
          Console.WriteLine("value of a: {0}", a)
          a = a + 1
      Loop While (a < 20)
      Console.ReadLine()
   End Sub
End Module

结果如下:

value of a: 10
value of a: 11
value of a: 12
value of a: 13
value of a: 14
value of a: 16
value of a: 17
value of a: 18
value of a: 19