Я использую генератор случайных чисел в своей программе, однако он сохраняет возвращающее одно и то же значение (0.71) каждый раз, когда я запускаю программу.генерирование случайных чисел в визуальных основах
код:
number = FormatNumber(Rnd(1), 2)
rdmlabelTxt.Text = number.ToString
есть способ производить различные случайные числа при запуске программы? спасибо.
Согласно Microsoft «такая же последовательность чисел генерируется», когда вы не даете параметр. В статье также предлагается «Прежде чем вызывать Rnd, используйте оператор Randomize без аргумента, чтобы инициализировать генератор случайных чисел семенами на основе системного таймера».
Я думаю, что это решит вашу проблему - сообщите нам.
да, что сработало. Большое спасибо –
Вы должны написать цикл, чтобы иметь возможность генерировать различные номера
For i = 1 to 100
number = FormatNumber(Rnd(1), 2)
Cells(i, "A").Value = number
next i
Вы просто должны использовать Randomize() вызов перед вашими кодами.
Randomize()
Dim number As Double = 0
number = FormatNumber(Rnd(1), 2)
rdmlabelTxt.Text = number.ToString
Вы должны уточнить, что 'Randomize()' следует вызывать только один раз во всей программе. Но тогда ваш ответ будет таким же, как у Марка, поэтому, к сожалению, вы не добавляете никакого значения этому сообщению. –
NET имеет проще использовать 'Random' класс ... – Plutonix
Прочитайте документацию - https://msdn.microsoft.com/en-us/library/f7s023d2(v=vs.90).aspx – osman
Возможный дубликат [Истинное создание случайных чисел] (http://stackoverflow.com/questions/19672483/true-random-number-generating) – Blackwood