含有VAR类型参数的函数，在VB中的调用(100分)

我写了一个ACTIVE SERVER OBJECT.其中有一个函数其申明如下：
function TMessageSender.queryUserInfo(const id, pwd: WideString
var remainCount, sendCount: Integer): Integer;
其中remainCount和sendCount是var类型的参数，在DELPHI和VC中调用都是正常的，但是我在VB中调用时出现“Byref 参数类型不符合” 。
VB中的调用语句如下：
Dim remainCount, sendCount As Long
result = smsObj.queryUserInfo("chhtest", "chh888", remainCount, sendCount)
请问各位，是什么原因导致？应该怎样更改才能正确调用后remainCount和sendCount能够被正确赋值？谢谢！

Dim remainCount as Long, sendCount As Long

接受答案了.