Лекция: Массивы в качестве формальных параметров в процедурах и функциях пользователя

Если в качестве формальных параметров в процедурах и функциях используются массивы, то в VB их тип в заголовке процедур или функций можно объявить как Variant, или вообще не указывать, т.к. этот тип итак принимается по умолчанию.

Пример. Вычислить

Фрагмент программного кода:

Option Explicit'Включение режима, при котором запрещается использовать

'необъявленные переменные

Dimx() As Integer 'Описание динамического массива a

Dim y() As Integer'Описание динамического массива b

Dim n As Integer

'Процедура заполнения массива m0, m1, …,mn-1 случайными числами из промежутка [a,b].

'Формальные параметры: промежуток [а,b], n – количество элементов массива,

'm — массив

Private Sub Vd(a As Integer,b As Integer,nAs Integer,m)

Dim i As Integer

Randomize

Text2.Text = "" 'Очистка текстового окна Text2

For i = 0 To n – 1 'Перебор элементов

' Заполнение массива случайными числами из промежутка[a,b]

m(i) = Int((b — a + 1) * Rnd + a)

'Вывод элементов массива в текстовое поле Text2

Text2.Text = Text2.Text + " " + Str(m(i))

Next i