|
【17108】の質問内容についてなのですが
私は、FORTRANで作ったdllファイルを使用したいのですが
「エントリmultcallがDLLファイル〜内に見つかりせん」とエラーになってしまいます。
なんとか解決する方法はないでしょうか?
[VBAソース]
Private Declare Function multcall Lib _
"C:\計算\x1.dll" _
(ByVal a As Double, ByVal b As Double, ByVal c As Double) As Double
Sub Test()
Dim a As Double, b As Double, c As Double
a = cells(1,1)
b = cells(1,2)
Call multcall(c, a, b)
msgbox c
End Sub
---------------------------------------------------------------------
[Fortranソース]
subroutine multcall( c, a, b )
implicit none
dllexport multcall
real :: a, b, c
c = a * b
end
fortranでの内容は 引数a × 引数b の結果を cとして返すだけです。
引数はすべて実数で宣言してあります。
|
|