infinite-loop - 随机循环

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，则为是，如果是0，则为否

标签： infinite-loop

Answer 1

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

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