我想在自定義函數(shù)中調(diào)用DLL，發(fā)現(xiàn)無(wú)法成功。　[金字塔]

自定義了一個(gè)函數(shù)BI（）

Function Bi(Formula,H,L)

 Set History = Formula.ParentGrid.GetHistoryData()
 dim MyAddin
 
 set myaddin=createobject("MyActiveXDemo.VBSAddin")
 'bi=myaddin.mytest(H)
 
 End Function

執(zhí)行到 set myaddin=createobject("MyActiveXDemo.VBSAddin")行時(shí)報(bào)錯(cuò)。

這個(gè)DLL是用VB生成的。代碼如下：

Function VBSAddin(ByRef H As Double) As Double

VBSAddin = 2

End Function

報(bào)錯(cuò)原因是不能創(chuàng)建對(duì)象，錯(cuò)誤代碼429.

名字寫錯(cuò)了，改了以后就能調(diào)用了。我的DLL是activeX的。

不過，VBS是不是不支持?jǐn)?shù)組傳參啊？好像無(wú)論怎么改都不行。

數(shù)組暫時(shí)不行

那有無(wú)辦法批量處理序列模式下的數(shù)據(jù)序列呢？