如何创建两个不同的随机整数并显示它们

Question

我试图制作两个不同的随机整数，但它们总是变成相同的数字。我希望它们是33到126之间的两个不同的数字，然后显示它们，其中一个在Key.Text上，另一个在Key2.Text上

Dim RandomClass As New Random()
Dim RandomNumber As Integer
Dim RandomClass2 As Random()
Dim RandomNumber2 As Integer


RandomNumber = RandomClass.Next()
RandomNumber = RandomClass.Next(33, 126)

RandomNumber2 = RandomClass2.Next()
RandomNumber2 = RandomClass2.Next(33, 126)
Key.Text = RandomNumber
Key2.Text = RandomNumber2

Answer 1

关于班级System.Random的{​​{3}}：

  

默认种子值源自系统时钟并具有有限的分辨率。因此，通过调用默认构造函数紧密连续创建的不同Random对象将具有相同的默认种子值，因此将生成相同的随机数集。使用单个Random对象生成所有随机数可以避免此问题。您还可以通过修改系统时钟返回的种子值，然后将此新种子值显式提供给Random（Int32）构造函数来解决此问题。有关更多信息，请参阅Random（Int32）构造函数。