如何在VB中添加或到while循环？

【问题标题】：How to add Or to a While Loop in VB?如何在VB中添加或到while循环？
【发布时间】：2010-08-28 22:06:34
【问题描述】：

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

     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

但是还是不行！这是怎么回事？

【问题讨论】：

【解决方案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。前一个版本都是短路操作，而后者则不是。

【讨论】：