vb调用C++编写的一个dll，如何传一个数组参数

Question

dll中是这么写的，feature是一个整数数组
extern "C" BOOL PASCAL EXPORT IsAccordoRule(int *feature)请问我在vb中调用这个函数时，declare语句怎么写？
Private Declare Function IsAccordoRule Lib "DataMining" (ByRef feature As Integer) As Boolean    ？

Answer 1

vcdll 接口  aa([in]CURRENCY Total,[in]VARIANT Detail)dim detailArray as variant
VB调用: vcdll.aa( Total ,detailArray)

Answer 2

vcdll 接口  
vcdll::aa([in]CURRENCY Total,[in]VARIANT Detail)VB调用: 
dim Total as CURRENCY 
dim detailArray() as variant
vcdll.aa( Total ,detailArray)

Answer 3

dll怎么调试？在C++下面调用完全正常，但用vb调用总出毛病，应该返回110，可得到只有11，173返回17，感觉被截掉了个位数，又不知道如何调试，真急人

Answer 4

int AssociationRule::FindRule(VARIANT ScatteredFeature1,VARIANT ScatterFeature2)
{ 
int count1=0,count2=0;
for (int i=0;i<FeatureSize;i++){
if ((int)ScatteredFeature1[i]==(int)ScatterFeature2[i]){
  AddRule(i,ScatteredFeature1[i]);
};
}
return count2;
}error C2676: binary '[' : 'struct tagVARIANT' does not define this operator or a conversion to a type acceptable to the predefined operator