dll 中的函数为:
extern "C" _declspec (dllexport) int c_Test(float ax[7],float ax_0[7])
在VB中想调用这个函数,之前写了如下代码总是报错,想知道正确的调用方法,希望大神帮
能指点一下,万分感谢。
Private Declare Function c_Test Lib "c:\collision.dll" (ByRef a() As Single, ByRef a_0() As Single) As Long
Private Sub Command1_Click()
Dim b(7) As Single
Dim b_0(7) As Single
For i = 0 To 7
b(i) = 1
b_0(i) = 1
Next i
Label1.Caption = c_Test(b(), b_0())
End Sub