Vb调用问题

[whmsd]

我用vc开发了一个基于控制台的dll库。
用vc的调用dll没有问题，用vf调用也没有问题。

在vb中
Declare Function f_DetectCom Lib "jsic.dll" (ByVal nCom As Integer) As Integer

Dim ret As Integer
Dim nCom As Integer

nCom = 1

ret = f_DetectCom(nCom)

If ret > 0 Then
Text1.Text = CStr(ret)
Else
MsgBox "error"
End If

程序执行后，出错
runtime error “49”
bad dll calling convention