В табл. 7.3. вы можете видеть массив MyArray после заполнения его фамилиями и номерами телефонов. В MyArray (1,1) мы внесли фамилию "Иванов", в MyArray (1,2) - телефон Иванова 898989898 и т.д.
| Таблица 7.3. Заполненный массив MyArray
|
| Индекс
|
|
|
|
| Иванов
|
|
|
| Петров
|
|
|
| Сидоров
|
|
|
| Александров
|
|
|
| Маринин
|
|
Эта программа очень похожа на те, которые мы писали для работы с одномерными массивами. В цикле, тело которого повторяется 5 раз, мы поочередно запрашиваем фамилию и номер телефона.
Один цикл неудобно использовать для работы с массивами больших размерностей. Нетрудно представить себе, какой громоздкой получится решение задачи копирования одной матрицы 100х100 в другую такую же. Кстати, при обработке данных в Microsoft Excel вам постоянно придется обращаться с большими двумерными матрицами. К счастью, существует механизм вложенных циклов, который помогает решать подобные задачи.
Вложенные циклы For-Next
07-04-Вложенные циклы.docm - пример к п. 7.6.
Принцип работы вложенных циклов кроется в их названии. Все очень просто - один цикл вкладывается в другой. Например, для заполнения массива 10х10 случайными целыми числами от 1 до 10 можно написать такую программу (листинг 7.6.)
Dim MyArray(1 To 10, 1 To 10)
For i = 1 To 10
For j = 1 To 10
MyArray(i, j) = Int(Rnd(1) * 10)
Next j
Next i
