含有VAR类型参数的函数在VB中该怎样正确调用？

Question

我写了一个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能够被正确赋值？谢谢！

Answer 1

你把"chhtest", "chh888", 定义成常量带入试试；
另外result是否为整数类型

Answer 2

问题不是出在前两个参数上面，而是在remainCount和sendCount上面。

Answer 3

俺找到方法了。将
Dim remainCount, sendCount As Long
改为
Dim remainCount As Long, sendCount As Long
即可.