Конференция VBStreets

**GURMAN** » 11.05.2005 (Ср) 14:25

Челы! помогите!
Как можно сгенерировать целое число начиная с любой цифры(только не от 1 или 0) например от 15 до37?[/u]

**Konst_One** » 11.05.2005 (Ср) 14:29

Код: Выделить всё: Dim MyValue Randomize ' Initialize random-number generator. MyValue = Int((37 * Rnd) + 37) ' Generate random value between 15 and 37. Debug.Print MyValue

**ANDLL** » 11.05.2005 (Ср) 14:29

=Rnd*(37-15)+15

**ANDLL** » 11.05.2005 (Ср) 14:30

Konst_One писал(а):
Код: Выделить всё
Dim MyValue Randomize ' Initialize random-number generator. MyValue = Int((37 * Rnd) + 37) ' Generate random value between 15 and 37. Debug.Print MyValue

Нет. От 37 до 74.

**Konst_One** » 11.05.2005 (Ср) 14:31

описка вышла

Код: Выделить всё: MyValue = Int((37 * Rnd) + 15)

**ANDLL** » 11.05.2005 (Ср) 14:33

Konst_One писал(а):описка вышла
Код: Выделить всё
MyValue = Int((37 * Rnd) + 15)

Тогда от 15 до 52

**GURMAN** » 11.05.2005 (Ср) 14:33

Всем большое спасибо!!!!

**Konst_One** » 11.05.2005 (Ср) 14:36

Код: Выделить всё: MyValue = Int(Rnd * 22 + 15)

вот , что значит невнимательность :lol:

**Konst_One** » 11.05.2005 (Ср) 14:38

однако , слишком узок диапазон значений
поэтому, рекомендую проверять ближайшие значения на повтор

**GURMAN** » 11.05.2005 (Ср) 14:38

Всем большое спасибо!!!!

**GURMAN** » 11.05.2005 (Ср) 14:43

Слухай, Konst One!
У тебя и-мыло есть?
а то у меня вообще-то вопросов по ВБ много, а задавать их на форумах
- связь не очень, часто вылетаю.

**Konst_One** » 11.05.2005 (Ср) 14:47

мыло то есть, но лучше на форуме
у меня ведь и основная работа есть

а здесь , если есть время, то общаюсь

**GURMAN** » 11.05.2005 (Ср) 14:49

А куда Fix вставлять? (Konst One'у)

**Konst_One** » 11.05.2005 (Ср) 14:55

а зачем он тебе? там и так Integer

**GURMAN** » 11.05.2005 (Ср) 14:58

Что - то я тормознул...

**GURMAN** » 11.05.2005 (Ср) 14:59

Что - то я тормознул...

**Alexander N. Samarin** » 12.05.2005 (Чт) 16:49

cint ( (Max - Min)*Rnd + Min)
2 GURMAN
Min = 37
Max = 74

Конференция VBStreets

Генератор цифр

Генератор цифр

Кто сейчас на конференции