| Вопрос: Генерация чисел из нескольких диапазонов | Добавлено: 17.02.03 16:23 |
Автор вопроса:  djsoft
|
|
Как случайно сгенерировать число из диапазона я знаю. А как это сделать из нескольких диапазонов. Например нужно получить число либо 2-5 либо от 7-10. Может кто знает как это сделать при знании всего диапазона 1-15 и неучаствуещего дипазона(ов) 1;6;11-15 |
| Ответы | Всего ответов: 4 |
|
Номер ответа: 1 Автор ответа:  Alex3 ICQ: 9481061 Вопросов: 18 Ответов: 132 |
Профиль | | #1 | Добавлено: 17.02.03 16:40 |
|
Самый топорный способ: Dim x As Long Randomize Timer Do x = Int((15 * Rnd) + 1) Loop While (x < 2 Or x > 5) And (x < 7 Or x > 10) MsgBox x |
||
|
Номер ответа: 2 Автор ответа: djsoft Вопросов: 5 Ответов: 12 |
Профиль | | #2 | Добавлено: 18.02.03 09:00 |
| Вроде работает. А х обязательно Long? Integer не подойдет? | ||
|
Номер ответа: 3 Автор ответа:  Alex3ICQ: 9481061 Вопросов: 18 Ответов: 132 |
Профиль | | #3 | Добавлено: 18.02.03 12:28 |
|
Можно, конечно, используй хоть Byte. Просто я всегда использую Long вместо Integer. Он быстрее, а призрачная экономия памяти меня не интересует |
||
|
Номер ответа: 4 Автор ответа: djsoftВопросов: 5 Ответов: 12 |
Профиль | | #4 | Добавлено: 18.02.03 12:57 |
| ОК, большое спасибо. Тогда бы еще русскую ссылочку на описание типов данных, их преимуществ и недостатков. | ||
Страница: 1 |