Форумы HiProg.com - MS ACCESS, VBA, VB

 

Ответить на сообщение

Вернуться к теме

Вы отвечаете на сообщение:

ник: TupoyProgrammer
В общем у меня получилось так. Спасибо всем.

Dim Array() As Long

ReDim Array(1 To XX)

For i = 1 To XX
Array(i) = Int((YYY - 1) * Rnd + 1)
Next i

Возник ещё вопрос для получения определённого значения из массива мне всегда нужно запускать Цикл для перебора значений или есть какой то другой способ???
К примеру мне надо вернуть значение Array21 - я запускаю цикл в котором при условии i=21 выполняю какие то действия???


Ваше имя:

Пароль:

Цитировать: [quote][/quote] Код: [code][/code]
Жирный: [b][/b] Наклонный: [i][/i]
URL: [url][/url] 

Сообщение:

 Размер файла не более 50 Кбт. Большие файлы можно размещать на www.slil.ru

Прикрепить:

 

Для вставки смайлов в текст щелкните по значку.