随机循环

Question

我做了一个小选择器，它只是说是或不是，但我不知道为什么它会卡在 While 的循环中这是它：

Private Sub Button2_Click(sender As Object, e As EventArgs) Handles Button2.Click
    Dim kk As Integer
    kk = CInt(Int(Rnd() * 100) + 1)

    While (kk <> 0 Or kk <> 1)
        kk = kk / 2
    End While

    lblSiNo.Text = kk.ToString

End Sub

如果是1，就是Yes，如果是0，就是No

Answer 1

While (kk <> 0 Or kk <> 1)

每个整数都不同于 0 或 1，不能同时等于 1 和 0。您的谓词始终为真。

随机循环

Loop with a random

infinite-loop