Wcdm专利a

vc的Sample.cpp

int __stdcall fun(双a，双b，双* res)

{

RES[0]= a+b；

RES[1]= a-b；

RES[2]= a * b；

RES[3]= a/b；

返回0；

}

vc的样本定义

出口

乐趣

vb:

声明子fun库“sample . dll”(byval a为double，byval b为double，byref x为double)

私有子命令1_click()

dim x(4)为双精度

fun 1，2，x(0)

text1.text = x(0)

text2.text = x(1)

text3.text = x(2)

text4.text = x(3)

末端接头

在上面的例子中，将数组的第一个元素传递给dll可以把东西作为返回值带回来。