Как в VBA сделать так, чтобы функция возвращала массив?

Формулировка задачи:

Задача: пусть есть числа a, b. Причем a < b. Создать массив, включающий числа из диапазона [a; b].

Решение задачи: «Как в VBA сделать так, чтобы функция возвращала массив?»

textual
                            Листинг программы 
                        

                            Function функция(a, b)
ReDim m(a To b)
For i = a To b
  m(i) = i
Next
функция = m
End Function
 
Sub main()
MsgBox Join(функция(7, 15)), , "чтобы функция возвращала массив?"
End Sub
                        

Оцени полезность:

7 голосов , оценка 3.857 из 5

Похожие ответы