如果调用动态链接库函数保存函数返回值

Question

在BCB中已定义好：extern "C" __declspec(dllexport) unsigned char __stdcall Inport();请问在VB中应该如何引用这个函数，该函数返回一个unsigned char 在VB中应该如何获得它。我现在这样写：“Private Declare Sub Inport Lib "Project2.dll" () As Long” 可是通过不过，请问应该如何调用，以及保存Inport这个函数的返回值。

Answer 1

Private Declare Sub Inport Lib "Project2.dll" () As Byte

Answer 2

Private Declare Sub Inport Lib "Project2.dll" Alias "_Inport@0" () As Byte

Answer 3

我有这三行语句：
Private Declare Sub init Lib "a.dll" ()
Private Declare Sub Inport Lib "a.dll" () As Byte
Private Declare Sub Outport Lib "a.dll" (ByVal value As Long)不知道为什么就是第二行出错：
提示：
编译错误
缺少：语句结束

Answer 4

Private Declare Function Inport Lib "Project2.dll" Alias "_Inport@0" () As Byte