如何在VB中的While循环中添加Or？

Question

目前，假设我有这段代码：

     While r <> "HI"
        r = RandomStringGenerator(1)
        time = time + 1
        Console.WriteLine(r)
    End While

我该如何制作它，以便我基本上可以这样说：

    While r <> "HI" Or While r <> "BY"
        r = RandomStringGenerator(1)
        time = time + 1
        Console.WriteLine(r)
    End While

我已经尝试过：

    While r <> "HI" Or r <> "BY"
        r = RandomStringGenerator(1)
        time = time + 1
        Console.WriteLine(r)
    End While

但它仍然不起作用！这是怎么回事？

Answer 1

您编写条件的方式将始终为真，并且循环将无限进行。

r <> "HI" Or r <> "BY"

这本质上是说

如果 r 不等于“Hi”或 r 不等于“By”

这对于存在的每个字符串都是如此。如果字符串既不是“hi”也不是“by”，听起来您想继续。如果是这样，请尝试以下

While r <> "HI" AndAlso r <> "BY"
    r = RandomStringGenerator(1)
    time = time + 1
    Console.WriteLine(r)
End While

最后一点是，您应该更喜欢 OrElse 而不是普通的 Or，并且 AndAlso 而不是普通的 And 。前一个版本都是短路操作，后一个版本则不是。