随机循环

时间:2018-12-28 00:47:59

标签: infinite-loop

我做了一个小选择器,它只是说是或不是,但我想知道为什么它在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,则为否

1 个答案:

答案 0 :(得分:0)

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

每个整数都不等于0或1,不能都等于1和0。谓词始终为真。

相关问题