Программа 20.17. Использование именованных аргументов
Программа 20.17. Использование именованных аргументов
Sub Test2()
Dim bookshops(1 To 25) As Integer
Dim result As Boolean
Init bookshops
result = SaleAbility(arr := bookshops, numOfBooks := 3000)
MsgBox(result) End Sub
При описании синтаксиса объявления процедуры мы вскользь упомянули ключевое слово ParamArray, настало время уделить ему достойное внимание. Возможность передавать процедуре заранее неизвестное число фактических параметров является опять-таки уникальной по отношению ко многим другим языкам программирования.
Например, мы создадим процедуру подсчета общего количества заявок с использованием параметра ParamArray. При вызове этой процедуры в процедуре Tests можно задавать сколько угодно фактических параметров массива заявок.