Ввод исходных данных для массивов

Программирование на Visual Basic, главный форум. Обсуждение тем программирования на VB 1—6.
Даже если вы плохо разбираетесь в VB и программировании вообще — тут вам помогут. В разумных пределах, конечно.
Правила форума
Темы, в которых будет сначала написано «что нужно сделать», а затем просьба «помогите», будут закрыты.
Читайте требования к создаваемым темам.
v000v
Начинающий
Начинающий
 
Сообщения: 22
Зарегистрирован: 23.04.2005 (Сб) 19:06

Ввод исходных данных для массивов

Сообщение v000v » 04.09.2005 (Вс) 19:03

Всем привет!


Дано:

Дано три одномерных массива {A}, {B}, {C}.
Количество элементов в каждом массиве разное (max - 500 эл-ов/массив)

Каждому из них соответствует по два одномерных массива:
с одинаковым количеством элементов - 20 шт.

То есть:
{A} --> {a}, {b}
{B} --> {с}, {d}
{C} --> {e}, {f}

Вопрос:
Как описать ввод исходных данных таким образом, чтобы,
зная индекс элемента массивов {A}, {B} или {C},
можно было обратиться к соответствующим ему "малым" массивам.

Спасибо!

з.ы. Если условие не внятно описано, скажите.

v000v
Начинающий
Начинающий
 
Сообщения: 22
Зарегистрирован: 23.04.2005 (Сб) 19:06

Сообщение v000v » 04.09.2005 (Вс) 19:18

Сорри..

Исправлено:

{A} --> { {a}, {b} }
{B} --> { {с}, {d} }
{C} --> { {e}, {f} }

Amed
Алфизик
Алфизик
 
Сообщения: 5346
Зарегистрирован: 09.03.2003 (Вс) 9:26

Сообщение Amed » 04.09.2005 (Вс) 19:34

Dim GrMas(1 To 3, 1 To 500, 1 To 2, 1 To 20) As Variant

Обратиться к массиву {a}, соответствующему 1 элементу массива {B}:

For i = 1 to 20
Me.Print GrMas(2,1,1,i);
Next i

Обратиться к массиву {f}, соответствующему 5 элементу массива {C}:

For i = 1 to 20
Me.Print GrMas(3,5,2,i);
Next i

d3drm
Астролог
Астролог
Аватара пользователя
 
Сообщения: 2873
Зарегистрирован: 29.05.2002 (Ср) 23:34
Откуда: МаСКвА

Сообщение d3drm » 04.09.2005 (Вс) 19:36

уяссе :shock:
ХЎ

v000v
Начинающий
Начинающий
 
Сообщения: 22
Зарегистрирован: 23.04.2005 (Сб) 19:06

Сообщение v000v » 04.09.2005 (Вс) 19:51

to Amed: Thanks!


Вернуться в Visual Basic 1–6

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

Сейчас этот форум просматривают: SemrushBot и гости: 67

    TopList  
cron