作者yuchih0519 (昱)
看板Visual_Basic
标题Re: [VBA ] Call DLL 回传一个阵列给VBA
时间Sun Sep 20 03:10:42 2009
最近刚好也在研究怎麽写DLL让Excel VBA呼叫(不过我是用Delphi 7)
我的心得是,使用标准DLL的传入参数与回传值尽量采用简单的标准资料型态,
所谓"标准",是指integer, single, double, boolean....等有公众定义格式的型态,
可以避免某个语言专用格式(像是Delphi的String)不被其他语言所认识而造成错误。
所谓"简单",是指"单值"而非阵列,可以让参数及回传值直接使用,
(阵列不是不能用,只是要以指针定址方式自己去搬移记忆体,需要前处理与後处理)
我不懂C,不过看您的C++函数宣告猜想,似乎回传值是个double单值?(那这就不多说了)
我对於阵列参数的传入传出也是在摸索中,所以无法告诉你怎麽直接传阵列进去,
不过我自己是想到一个堪用的替代方案:字串
比如说,我要传一个如下的二维阵列
1 23 456
7 89 10
11 12 13
我先将他改写成单一字串(行、列分隔符号可自订,我个人习惯用MATLAB风格...)
1,23,456;7,89,10;11,12,13
将此字串当作传入参数,然後到DLL里面写个解译函式Split_String_to_Array,
您的test1函式只需要一开始先呼叫Split_String_to_Array将字串还原成阵列,
就可以继续进行原有的计算了。
不过由於是字串,什麽乱七八糟的内容都不分辨,因此要特别注意字串用分隔符号拆开後
每个元素的资料型态是否正确,不然会有错误产生。
不好意思,只是一个门外汉,所以只有这种不三不四的旁门左道,献丑了!
有这类问题的应该不只我们两个人,还希望真正的高手能出面指导一下正统的作法,
让後进们可以向前辈学习学习,谢谢。
※ 引述《a5170040 (Piggy)》之铭言:
: 想请问现在我在C++上面制作好DLL
: 想要在VBA上面使用
: 我的函数是这样的
: double test1(double data[][2],int c,double s[3],double o[3],summary[7])
: 其中summary[7]一开始是一个空白阵列
: 由VBA先给初值
: 然後VBA呼叫完DLL之後回传已经更新的summary[7]
: 想请问这一段要怎麽宣告跟使用
: 爬文有发现传一维阵列好像是这样
: 是这样宣告吗
: test1(ByRef data As variant,ByVal c,ByRef s() As double, _
: ByRef o(),ByRef summary() As double)
: 使用的时候传进去
: summary = test1(data,c,s,o,summary)
: 不过我怎麽改好像都不对
: 可以麻烦指点迷津一下吗?谢谢
: 谢谢!
--
※ 发信站: 批踢踢实业坊(ptt.cc)
◆ From: 114.42.133.147