Автор Пользователь удален задал вопрос в разделе Компьютеры, Связь
как сгенерировать случайное число на basik? и получил лучший ответ
Ответ от Ilya Nikitin[гуру]
random(1);
Ответ от Rat![гуру]
Вот тебе пример:Randomize ' Инициализирует генератор случайных чисел. MyValue = Int((10000 - Rnd) + 1) ' Возвращает случайное число от 1 до 10000. ProgressBar1.Min = 1 ProgressBar1.Max = 10000 For x = 1 To MyValue ProgressBar1.Value = x Next x
Вот тебе пример:Randomize ' Инициализирует генератор случайных чисел. MyValue = Int((10000 - Rnd) + 1) ' Возвращает случайное число от 1 до 10000. ProgressBar1.Min = 1 ProgressBar1.Max = 10000 For x = 1 To MyValue ProgressBar1.Value = x Next x
Ответ от 22 ответа[гуру]
Привет! Вот подборка тем с похожими вопросами и ответами на Ваш вопрос: как сгенерировать случайное число на basik?