我想在随机生成的for循环中生成1到10之间的随机数列表,它们可以是重复的。我现在的问题是,如果我使用说使用:
Dim value As Integer = CInt(Int((6 * Rnd()) + 1))
Dim index As Integer
For index = 0 to 9
Console.writeline(value)
Next
这会生成一个随机数,然后在循环的其余部分使用相同的数字。我是编程抱歉的新手,所以我可能听不懂任何技术性的东西,但我会试一试。谢谢你的帮助。
答案 0 :(得分:3)
试试这个:
Dim rdm As New Random()
For index As Integer = 0 To 9
Console.WriteLine(rdm.Next(1,11))
Next
答案 1 :(得分:2)
目前您正在设置随机数,但是在循环的每次迭代中都不会更改它。在循环之前删除CInt(Int((6 * Rnd()) + 1))
声明并将其放在循环中
For index = 0 to 9
value = CInt(Int((6 * Rnd()) + 1))
Console.writeline(value)
Next
答案 2 :(得分:1)
这是因为您只是声明了一次该值。您需要在每次迭代时声明一个新的随机值。
尝试:
Dim value As Integer
Dim index As Integer
For index = 0 to 9
value = CInt(Int((6 * Rnd()) + 1))
Console.writeline(value)
Next