vb调用vc的Dll的问题,出现"Bad DLL calling convention" Run-time erroe'49'?

faithgod

在VC中使用MFC DLL导出的函数:
void __stdcall PrintPortOut(BYTE data)
{
        theApp._outp(0x378,data);
}
并有在.def中输出:EXPORTS
    ; Explicit exports can go here
PrintPortOut

然后在VB中调用:
Declare Function q Lib "PrintPort.dll" Alias "PrintPortOut" _
    (ByVal pSelectAdapter As Byte)

Private Sub Command1_Click()
Dim c As String
Dim d As Byte
d = CByte(&H0)
c = q(d)
End Sub
但执行完成总会出错:出现"Bad DLL calling convention" Run-time erroe'49'?

faithgod

大家给个建议啊.

wow_new

察看数组是否越界

faithgod

谢谢,应该没有数组越界的问题啊?

rsq666

DLL应该是规则DLL

faithgod

谢谢,己解决,是VB的问题.

shuaige1976

請問下，是什麽問題呢，我也遇到這樣的問題。。。。
怎麼解決的。。