Передача массива в качестве параметра

[Lunatic]

Недавно возникла потребность написать свою библу. Но так как опыта в этом не имел до этого, постоянно сталкиваюсь с какими-то проблемами. Вот очередная
Есть Модуль-класса как сделать в качестве Property этого класса, динамический Public массив из обычного модуля?

[alibek]

Не понял.
Тебе нужно индексированное свойство?

[Lunatic]

Ну вот к примеру у мну есть проект с dll в нем есть модуль в котором обрабатывается инфа и заносит результат в массив. Но как я понял к dll можно "общятся" только через модуль-класса этой библы. Как мне передать этот массив?

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

Private Declare ..... Lib MyDll ..........(Или просто добавить в Reference)

Form Load()
D = MyDll.MyPropertyOrFunction.MyArray(1)
End Sub


[Хакер]

Lunatic
Ужас. Не делай DLL. И не мни "У".

[Lunatic]

Издеваетесь да?!
Ладно! Забудем про библиотеку. Как сделать чтобы функция массив возвращяла?

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

Type MyArr
TempArr() as String
End Type

Function Call_Me() as MyArr
... а дальше что?


[Хакер]

Ещё нет, кажется.

Но ты, Lunatic, действительно издеваешься, написав

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

Private Declare ..... Lib MyDll ..........(Или просто добавить в Reference)


(особенно, написав комментарий в скобках, якобы подчёркивающий тождественность между Private Declare и добавлением в References)

[Хакер]

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

Public Function za() As String()
ReDim f(1 To 3) As String
f(1) = "Привет"
f(2) = "всем"
f(3) = "кто тут есть"
za = f

End Function

[Lunatic]

Большое спасибо! Какраз то что было нужно. Я ж просто говорю, что это для меня ново, поэтому проблемы.
Еще раз сенк))