Основы офисного программирования и язык VBA


Массивы - часть 2


<граничная пара> ::= <константное выражение> To <константное выражение>

Не используйте Option Base. Это ненадежное средство.

Программист Бэдли (не "наш" программист), зная, что массивы положено объявлять, дал следующее объявление:

Dim BadArr(10)

Запись получилась короткой, он написал ее быстро и был горд собой. Могу подтвердить, Бэдли действительно быстро пишет программы, жаль только, что они не всегда правильно работают. Вот еще один пример его работы:

'Option Base 0 Option Base 1 Dim Vector(10) Dim A1(5), A2(5) As Integer 'Бэдли добавил новое объявление массива Matrix 'При работе с матрицей ему удобно было, чтобы индексы начинались с 1, 'поэтому он изменил опцию Base, отменив предыдущее соглашение 'Ранее работавшая процедура War перестала работать Dim Matrix(10, 20) As Double

Public Sub War() Dim i For i = 0 To 5 A1(i) = i: A2(i) = i + 5 Vector(i) = A1(i): Vector(i + 5) = A2(i) Next i End Sub

Каждая строчка этого быстро написанного текста должна быть переписана при хорошем программировании.




Начало  Назад  Вперед



Книжный магазин