动态链接库 Declare Function
C++里动态链接库函数头文件为：

IMPORT_TYPE void _stdcall PT2H97(double P,double T,double & H,int & Range);

在VBA里使用，动态链接库里该怎样声明，以下代码执行时出现：“运行错误‘16’，表达式太复杂”

Option Explicit
Declare Function PT2H97 Lib "WASPCN.DLL" (ByVal P As Double, ByVal T As Double, H As Double, R As Double) As Double
Sub shuizhengqi()
Dim result As Double
Dim hh As Double
Dim rr As Double
result = PT2H97(0.1, 100, hh, rr)
End Sub

请问我该怎眼修改？？？
[解决办法]
貌似不能VBA声明DLL函数吧，我不清楚
[解决办法]
R As Double
=> R As Long