VB.NET 中的 GoTo 语句和替代语句

Question

我在另一个论坛上发布了一个代码片段寻求帮助，人们向我指出使用 GoTo 语句是非常糟糕的编程习惯。我想知道：为什么会不好呢？

在 VB.NET 中，有哪些替代 GoTo 的方法可以被认为是更好的实践？

考虑下面的这个片段，用户必须输入他们的出生日期。如果月/日/年无效或不切实际，我想返回并再次询问用户。 （我正在使用 if 语句来检查整数的大小...如果有更好的方法来执行此操作，如果您也能告诉我，我将不胜感激：D）

retryday:
    Console.WriteLine("Please enter the day you were born : ")
    day = Console.ReadLine
    If day > 31 Or day < 1 Then
        Console.WriteLine("Please enter a valid day")
        GoTo retryday
    End If

Answer 1

我要与其他人不同的是，GOTO 本身并不都是邪恶的。罪恶来自于对 GOTO 的滥用。

一般来说，几乎总是有比使用 GOTO 更好的解决方案，但有时 GOTO 确实是正确的方法。

话虽这么说，你是一个初学者，所以在接下来的几年里，你不应该被允许判断 GOTO 是否正确（因为它几乎从来没有正确过）。

我会这样写你的代码（我的 VB 有点生疏...）：

Dim valid As Boolean = False

While Not valid
    Console.WriteLine("Please enter the day you were born: ")

    Dim day As String

    day = Console.ReadLine

    If day > 31 Or day < 1 Then
        Console.WriteLine("Please enter a valid day.")
    Else
        valid = True
    End If
End While

如果你拿你的 GOTO 代码看一下，别人会如何首先处理你的代码？ “嗯..重试日？这有什么作用？什么时候发生？哦，所以如果日期超出范围，我们就转到该标签。好的，所以我们要循环，直到日期被认为是有效且在范围内” 。

而如果你看我的：

“哦，我们想继续这样做，直到它有效。当日期在范围内时它是有效的。”

Answer 2

http://xkcd.com/292/ 我认为这是GoTo<的标准意见/代码>。

相反，尝试使用 Do Until 循环。 Do Until 循环将始终执行一次，当您需要提示用户并希望确保在他们输入正确的信息之前不会继续操作时，它非常有用。

Sub Main()
    'Every time the loop runs, this variable will tell whether
    'the user has finally entered a proper value.
    Dim Valid As Boolean = False

    'This is the variable which stores the final number which user enters.
    Dim Day As Integer = 0
    Do Until Valid
        Console.WriteLine("Enter the day:")
        Dim DayStr As String = Console.ReadLine()

        If Not Integer.TryParse(DayStr, Day) Then
            Console.WriteLine("Invalid value! It must be a valid number.")
            Valid = False
        ElseIf (Day < 1) Or (Day > 31) Then
            onsole.WriteLine("Invalid day! It must be from 1 to 31.")
           Valid = False
        Else
           Valid = True
        End If
    Loop

    'blablabla
    'Do whatever you want, with the Day variable
End Sub

Answer 3

GOTO 构造生成 sphagetti 代码。这使得通过代码进行跟踪几乎是不可能的。

过程式/函数式编程是一种更好的方法。

Answer 4

关于 GoTo 语句的优点（或者更确切地说缺乏它）的问题在这个网站上一直存在。单击此处查看示例：GoTo 仍然被认为有害吗？

关于 GoTo 的替代方案，在提供的代码片段中，一个 while 循环可以很好地实现这一目的，也许类似于：

day = -1
While (day < 0)
   Console.WriteLine("Please enter the day you were born : ")
   day = Console.ReadLine
   If day > 31 Or day < 1 Then
     Console.WriteLine("Please enter a valid day")
      day = -1
   End If
End While

Answer 5

GOTO 是一个相当政治的问题。 GOTO 的“解决方案”是使用其他内置导航结构，如函数、方法、循环等。对于 VB，您可以创建一个运行该代码的子过程，或者将其放入 While 循环中。你可以很容易地用谷歌搜索这两个主题。

Answer 6

有点笨拙，但是：

    Dim bContinue As Boolean

    Console.WriteLine("Enter a number between 1 and 31")

    Do
        Dim number As Integer = Console.ReadLine()
        If number >= 1 AndAlso number <= 31 Then
            bContinue = True
        Else
            Console.WriteLine("Please enter a VALID number between 1 and 31")
        End If
    Loop Until bContinue

还要考虑“goto land”中的一些基本循环

        Dim i As Integer
startofloop1:

        Debug.WriteLine(i)
        i += 1
        If i <= 10 Then
            GoTo startofloop1
        End If

        i = 0

startofloop2:

        Debug.WriteLine(i * 2)
        i += 1
        If i <= 10 Then
            GoTo startofloop2
        End If

这是一个很好的等价物：

   For x As Integer = 0 To 10
        Debug.WriteLine(i)
    Next
    For x As Integer = 0 To 10
        Debug.WriteLine(i * 2)
    Next

哪个更具可读性并且更不容易出错？

Answer 7

几十年来，使用 goto 一直被认为是一种不好的做法。也许这是对最初的 BASIC（在 Visual Basic 之前）的强烈反对。在最初的 BASIC 中，没有 while 循环，没有局部变量（只有全局变量），并且（在大多数 BASIC 版本中）函数不能接受参数或返回值。此外，功能没有明确分离；如果您忘记了 RETURN 语句，控制权可能会隐式地从一个函数转移到另一个函数。最后，代码缩进在这些早期的 BASIC 中是一个外国概念。

如果你使用最初的 BASIC 一段时间（就像我一样），你会意识到全局变量和 goto 的使用无处不在使得一个大程序变得难以理解，而且一不小心就把它变成了一堆混乱的东西。 “意大利细面条”。当我学习 QBASIC 及其 WHILE..WEND 循环和 SUB 时，我从未回头。

我不认为 goto 的伤害很小，但在编码器文化中，一种强烈的感觉挥之不去，认为它们在某种程度上是邪恶的。因此，我会避免使用 goto，无非是为了避免冒犯别人的感受。有时我发现 goto 可以干净地解决问题（例如从内循环中跳出外循环），但您应该考虑其他解决方案是否使代码更具可读性（例如，将外循环放在单独的函数中并使用“ exit 函数”，而不是内部循环中的 goto）。

我编写了一个 C++ 程序，大约有 100,000 行代码，并且使用了 30 次 goto。同时，有超过 1,000 个“正常”循环和大约 10,000 个“if”语句。

Answer 8

功能 FTW！

好吧，我不确定你的代码是否真的是 VB.Net，因为你遇到了一些奇怪的类型（即 Console.Readline 返回一个 String ，不是一个可以进行比较的数字）...所以我们暂时忘记类型。

Console.Writeline("Please enter the day you were born : ")
day = Console.Readline()

While not ValidDate(day)
   Console.WriteLine("Please enter a valid day")
   day = Console.Readline()
End While

单独

Function ValidDate(day) As Boolean
  Return day > 31 Or day < 1
End Function

或者你可以享受递归和提前返回语法的乐趣！ ;)

Function GetDate() As String
  Console.Writeline("Please enter the day you were born : ")
  day = Console.Readline()

  If ValidDate(day) Then Return day 'Early return

  Console.Writeline("Invalid date... try again")
  GetDate()
End Function

Answer 9

While True
    Console.WriteLine("Please enter the day you were born : ")
    day = Console.ReadLine
    If day > 31 Or day < 1 Then
        Console.WriteLine("Please enter a valid day")
        Continue
    Else
        Break
    End If
End While

Answer 10

您可以使用简单的内置语言结构（例如决策结构和循环）来完成使用 GOTO 可以做的几乎任何事情，而 GOTO 语句通常会造成混乱且无法完成的任务。 -理解意大利面条代码。循环和 if 等具有清晰、可接受、易于理解的用法。

正如通常建议的那样，请参阅 Dijkstra 的被视为有害的转到声明

Answer 11

通常建议我们遵循 Dijkstra 在《被认为有害的首选声明》中的建议。

唐纳德·高德纳 (Donald Knuth) 对迪杰斯特拉 (Dijkstra) 的回答非常中肯。这里的这个例子是他的一个反例的现代版本。就我个人而言，当我遇到这种情况时，我会编写带有内部中断的无限循环，但在其他一些罕见的情况下，我会编写 GOTO 语句。

对我来说最常见的是打破深层嵌套循环和这种模式：

ContinueTry:
   Try
        'Worker code
   Catch ex as IO.IOException
        If MessageBox.Show(...) = DialogResult.Retry Then Goto ContinueTry
        Throw
   End Try

我还有两种大型有限状态机的情况，其中 goto 语句提供转换。

Answer 12

即使外面的“按规矩”狼群会投反对票，我也会投我的票。
看看：在支持循环和函数的语言中使用“goto”是否有利？如果是这样，为什么？

Answer 13

我必须同意这里其他人的观点：GOTO 本身并不邪恶，但滥用它肯定会让你的生活变得悲惨。还有许多其他控制结构可供选择，编写良好的程序通常可以处理大多数情况而无需 goto。话虽如此，我的程序已接近完成，该程序约有 15,000 行，我使用了一个且仅一个 GOTO 语句（我们可能会替换它）。在我处理过的十多个程序中，这是我第一次使用 GOTO。但在这种情况下，它消除了编译器错误（在同一个 Sub 中但在不同的 If 结构中使用 Me.Close() 两次；我本可以抑制它，但我只是简单地放入一个标签并将一个 Me.Close() 替换为转到关闭标签）。如果我开始遇到更多需要在此子中使用 Me.Close() 的实例，我可能会将 Me.Close() 放入其自己的子中，然后简单地从 If 结构或其他导致关闭的循环中调用该子程序的... 正如我所说，还有其他选择，但有时，当很少、谨慎且有策略地使用时，GoTo 仍然会有所帮助。只是要小心意大利面条代码，那是一团混乱，哈哈

Answer 14

你的代码没问题。它简洁明了。这比用额外的变量和做同样事情的不同动词将工作膨胀 50% 到 200% 更好。

如果您只是向后或向前跳到逻辑块的开头或结尾，那么 go(to) 即可。 “循环”或“结束同时”仍然是一个跳转，但目的地是隐含的。唯一的优点是编译器将阻止您使两个循环交叉路径，但它不能使用一对 goto。使用 goto 时，不要跨流。那会很糟糕。 ——斯宾格勒博士

我的另一个烦恼是“一进一出”规则。当然你只能有一个入口，除非你用汇编语言编写。但“一次退出”规则是愚蠢的。它只会导致一堆嵌套的边界检查，使您的代码超出右边距。在例程顶部测试所有参数，如果它们非法，则“退出子”会更清楚。什么更有意义？

if badparam then
  log error
  exit sub
  endif

if badparam2 then
  log error2
  exit sub
  endif

do stuff

或者这个？

if goodparam then
  if goodparam2 then
    do stuff
  else
    log error2
    endif
else
  log error 
  endif 

当你有六次边界检查并且“东西”是 60 行而你无法分解成更小的部分时，那么第二种方法对于任何必须维护它的人来说就会变成一场噩梦。最好完成您正在做的事情（检查异常），而不是将所有异常处理推迟到最后。

我的 0.02 美元