как правильно сделать вызов неопределенного количества структур заданного типа?

Возник вопрос:
Есть некоторая функция WinAPI, которая требует в качестве параметров указатель на буфер и его размер.

В буфер будет помещено неопределенное количество структур заданного типа.

Понятно как описать структуру в VB, но как правильно сделать вызов?

0

Обычно в таких случаях делается два вызова такой функции, когда делается первый, в функцию вместо буфера по ByVal передается 0, а в параметр который должен содержать размер буфера, передается переменная и обычно в таких случаях API функция возвращает в эту переменную размер который будет иметь буфер, а второй раз будешь вызывать уже нормально.

Ладно, уточняю. Вот собственно функция.
------------------------------------------------------------------
Declare Function WNetEnumResource Lib 'mpr.dll' Alias 'WNetEnumResourceA' _
(ByVal hEnum As Long, lpcCount As Long, lpBuffer As Any, _
lpBufferSize As Long) As Long
------------------------------------------------------------------
lpBuffer -- это указатель на буфер, куда будут занесены структуры:

Type NETRESOURCE
dwScope As Long
dwType As Long
dwDisplayType As Long
dwUsage As Long
lpLocalName As String
lpRemoteName As String
lpComment As String
lpProvider As String
End Type
---------------------------------------------------------------------

Мне сейчас не проверить, вот и спрашиваю: будет правильным такой вызов?

Dim rNt(200) As NETRESOURCE

rNet = Len(rNt(0)) * 200
lRes = WNetEnumResource(..., ..., rNt(0), rNet)
^^^^^^^^^^^^
В С++ все очевидно - выделил буфер в памяти, указатель на структуру приравнял
указателю на буфер и поехал. А вот в VB как массивы в памяти храняться?

0