Как в функцию передать массив данных?

[Citius]

Думаю вопрос просто мега тупой, но я не знаю

[tyomitch]

А в чём конкретно затруднения?

[ALX_2002]

К примеру так.

Код: Выделить всё

Dim MyArr(10) As Long

Private Sub Form_Load()
    GArray MyArr
End Sub

Function GArray(ByRef DataArray() As Long)
    MsgBox UBound(DataArray)
End Function

[Citius]

Ага понял, т.е. без ByRef работать не будет.

[ALX_2002]

В том случае нет.

Но если ты объявишь глобальную переменную, то можешь её заюзать и без всякой передачи в той же функции. И..... ну.... лан. Короч - ога.

[Александр Дмитриев]

т.е. без ByRef работать не будет

Нет, ByRef используется по умолчанию, если о методе передачи параметра ничего не сказано. Так что ByRef в примере ALX_2002 можно убрать. Фишка в том, что чтобы использовать массив в качестве параметра функции, нужно в формальных параметрах функции указать его имя и после него две скобки () (не указывая диапазон или кол-во индексов), а в фактических параметрах просто указать имя.

[tyomitch]

Ага понял, т.е. без ByRef работать не будет.

Будет.
ByRef подразумевается по умолчанию, если не указан ByVal.

[add]

а в фактических параметрах просто указать имя.

Можно указать и пустые скобки после имени, они не помешают.