随机数生成器VB.NET For循环

时间:2014-05-02 11:43:32

标签: vb.net loops random

我想在随机生成的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

这会生成一个随机数,然后在循环的其余部分使用相同的数字。我是编程抱歉的新手,所以我可能听不懂任何技术性的东西,但我会试一试。谢谢你的帮助。

3 个答案:

答案 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