如何在VB中创建非重复随机数

Question

我正在VB中创建一个简单的游戏，因为玩家射击，这是一个随机的机会，因为每个点都可以射击，因此当“ Sub playShot（ ）”重复，该数字必须在1到10之间。

这是我目前拥有的，但是它只输出相同的数字：

Dim rnd As New Random
Dim shot As Integer = rnd.Next(1, 11)

我可以重复输入数字，但现在还是一样。

Answer 1

当您有一个范围，不想重复随机值时，通常的解决方案是依次生成该范围内的所有数字（在本例中为1到10）。然后您随机播放该序列。现在，您可以遍历随机数据。