EXPORTS
add
long add(long var1,long var2)
{
return var1+var2;
}Private Declare Function add Lib "..\JAPI.dll" (ByVal var1 As Long, ByVal var2 As Long) As LongPrivate Sub Command1_Click()
    Text3.Text = add(CLng(Text1.Text), CLng(Text2.Text))
End Sub运行到add函数时,dll 调用约定错误!!!!