Visual Basic

#pragma pack(4)
struct MyCppType
{
    short iVal;
    double dVal;
    BSTR bstr;
};
#pragma pack()
void _stdcall MyDllFunction (array of MyCppType)
{
  //do something with the array  	
}

LIBRARY	"MyTestDll"
EXPORTS
MyDllFunction	@1

Option Explicit
Declare Sub MyDllFunction Lib "MyTestDLL.dll" (arr() As MyVbaType)
Type MyVbaType
    iVal As Integer
    dVal As Double
    sVal As String
End Type
Sub Test()
    Dim arr(2) As MyVbaType
    
    arr(1).iVal = 1
    arr(1).dVal = 1.1
    arr(1).sVal = "one"
    
    arr(2).iVal = 2
    arr(2).dVal = 2.2
    arr(2).sVal = "two"
    
    MyDllFunction (arr)    
End Sub