Введение в информатику процессов первичной переработки нефти. Новиков А.А - 58 стр.

UptoLike

Составители:

Рубрика:

Data4(1, 2) = 94

Data4(1, 3) = #3/21/2007#

MsgBox “Марка нефти “, Data4(1, 1) & ", цена за баррель " & Data4(1, 2) & _

", дата добычи " & Data4(1, 3)

End Sub

Сначала в строке 2 Pro11 мы описали массив Data4 типа Variant, не указывая

число измерений и элементов. В этой инструкции определяется динамический мас-

сив, но память под него не отводится, пока в строке 3 не встречается инструкция

ReDim. В ней массив Data4 объявлен как одномерный 2-элементный массив.

В строках 4 и 5 двум элементам этого массива присваиваются числа. В строке 6

с помощью функции InputBox пользователю предлагается ввести число (1 или 2),

которое в следующей строке используется как порядковый номер элемента массива

Data4 для вывода его содержимого на экран.

В 8-й строке инструкция ReDim используется еще раз для описания Data4 как

двухмерного массива, содержащего 6 элементов. Затем элементам первой строки

этого массива присваиваются значения и выводятся в информационном окне.

Так, позволяя поочередно отводить один и тот же массив под разные данные,

инструкция ReDim и динамический массив экономят память при выполнении про-

граммы (рис. 2.6).

Рис. 2.6. Пример работы программы Pro11