在 C++ 中调用 Visual Basic DLL

Question

我从第三方供应商处获得了一个用 Visual Basic 创建的 DLL（Sensor DLL.dll）。这个 DLL 包含与传感器通信的函数，我需要从我正在编写的 Visual C++ 程序中调用这些函数。供应商不会提供头文件，而且我不知道 Visual Basic。如果我有一个头文件，这将是一个 15 分钟的项目......相反，一周后我仍在努力解决它。请帮忙！

有人告诉我 DLL 中的一个函数 (Get_Data) 的形式是：

Public Function Get_Data(ByVal Handle As String) As String

我尝试了几种方法来调用这个 Get_Data 函数，但都没有成功：

方法一） DllImport 属性

#using <mscorlib.dll>
using namespace System::Runtime::InteropServices; 

namespace Sensor
{

[DllImport("Sensor DLL.dll", EntryPoint = "Get_Data", CharSet = System::Runtime::InteropServices::CharSet::Unicode)] BSTR Get_Data(BSTR 句柄); }

//then I call the function
Sensor::Get_Data(Handle);

这种方法似乎是我得到的最接近 sloution 的方法。它可以编译，但运行时会出现以下错误：

发生了“System.EntryPointNotFoundException”类型的未处理异常

附加信息：无法在 DLL“Sensor DLL.dll”中找到名为“Get_Data”的入口点。

我尝试了除 BSTR 之外的各种数据类型组合/排列，包括 BSTR*、wchar_t、int 等。可能我错过了一个，但每种数据类型都返回相同的错误。

方法二） dllimport 存储类属性

__declspec(dllimport) BSTR Get_Data(BSTR Handle);

//then I call the function
Get_Data(Handle);

这种方法让我感到困惑，因为我没有指定要从中导入的 DLL。我已将 DLL 复制到项目文件夹并手动将其添加到项目中，因此希望这意味着可以找到它。当我编译链接器返回以下错误：

错误 LNK2028：函数“int __cdecl main(void)”(?main@@$$HYAHXZ)

错误 LNK2019：函数“int __cdecl main(void)”(?main@@$$HYAHXZ) 中引用了无法解析的外部符号“wchar_t * __cdecl Get_Data(wchar_t *)”(?Get_Data@@$$FYAPA_WPA_W@Z)

我怀疑这可能意味着我应该使用 wchar_t 或 wchar_t* 而不是 BSTR，但是更改为任何一种数据类型都会导致相同的错误。

方法3） GetProcAddress

typedef BSTR (*Get_Data_Ptr)(BSTR Handle);  
HINSTANCE LoadMe;
LoadMe = LoadLibraryA("Sensor DLL.dll");

if (!LoadMe)
    std::cout << "\nDLL failed to load!\n";

Get_Data_Ptr LibMainGet_Data;  
LibMainGet_Data = (Get_Data_Ptr)GetProcAddress(LoadMe,"Get_Data");

//then I call the function
LibMainGet_Data(Handle);

这将编译，但运行时会出现以下错误：

发生“System.AccessViolationException”类型的未处理异常

附加信息：试图读取或写入受保护的内存。这通常表明其他内存已损坏。

当我在调试模式下将鼠标悬停在这段代码的各个部分时，似乎与第一种方法一样，它也无法在 DLL 中找到“Get_Data”入口点。

当您没有自己制作 DLL 并且您没有 .idl 文件等时，是否有人使用 C++ 从 VB DLL 调用函数？有没有人可以分享这样的工作示例？
谢谢！

Answer 1

VB6 DLL 通常是一个 COM 服务器。实际上，您确实拥有一个 .h 文件的等价物，它嵌入了一个类型库。从 Project + Properties、Common Properties、Framework 和 References 开始。添加新引用按钮，浏览选项卡，选择 DLL。

接下来，视图 + 对象浏览器。您应该在列表中看到生成的互操作库。打开节点看看里面有什么。您编写普通托管代码（如 gcnew）来创建 COM 对象并调用接口方法。您确实需要一些关于可用方法的最少文档来猜测应该如何调用它们。

Answer 2

我相信缺少的部分是调用约定。 C++ 有自己的函数调用约定，不同于 VB6（我假设是 VB6，因为您没有明确说明 VB.NET）。 VB6 使用 STDCALL 约定，而 C++（取决于供应商）使用称为 __cdecl 的不同调用约定，这就是您在方法 #2 的编译器错误行中看到 __cdecl 的原因。它假定您的外部函数默认使用该调用约定。调用约定是一组描述函数如何相互调用的规则；特别是关于如何使用寄存器，传递什么顺序参数，如何确定按值/按引用等。

我建议坚持使用方法 #3，因为方法 #1 是针对非标准 C++ 的托管 C++，而方法 #2 对我来说不熟悉并且看起来有点模棱两可。您想尝试的是声明函数指针 typedef 以使用 STDCALL。

typedef BSTR (__stdcall *Get_Data_Ptr)(BSTR Handle);

Answer 3

在 OLE/COM 查看器中，为了查看 dll/exe/... 中的 COM 类型库，您必须使用“File->View TypeLib”而不是“File->Bind to File”打开它"

Answer 4

听起来 DLL 实际上并未导出名为 Get_Data 的函数。打开命令提示符并使用dumpbin 获取 DLL 的导出列表，例如：

dumpbin /exports "Sensor DLL.dll"

（dumpbin.exe 位于 Visual Studio 安装文件夹中的 VC\bin 中，通常类似于 C:\Program Files\Microsoft Visual Studio 10.0）。

然后，将Get_Data替换为实际的入口点，看看你是否有更好的运气。

Answer 5

Visual Basic 程序通常需要运行时才能执行。

如果您有一个 COM 对象（在 VB 中实现），请使用 COM API 从 C++ 与其通信。您必须先注册 COM。这是一个解释热这样做的线程：http://forums.devx.com/archive/index.php/t-87059.html

如果您使用 .NET 语言，请使用 Hans Passant 的方法以及将为您创建互操作 dll 的参考。这要容易得多。

• 方法 1：不要这样做，如果您有一个要从 .NET 环境使用的 COM 对象，请引用它。
• 方法 2：由于缺少正确链接到 DLL 的 .lib 文件（静态动态链接）而出现错误
• 方法 3：将是一个纯动态解决方案，但您必须知道 DLL 中方法的确切名称。这些可能会根据使用的参数和调用约定而有所不同。这与您在使用方法 1 解决方案时遇到的问题非常相似（我会说实际上是相同的）。该方法的名称不是“Get_Data”而是其他名称。使用dependency viewer 之类的工具，您可以查看导出的名称。

即使名称正确的方法 3 也可能会失败，因为如果它是 COM 对象，您将需要一些名为 Appartment 的环境来使用 COM 对象。你通过调用CoInitialize“进入”这个公寓。这在 TLS（线程本地存储）中创建了一些神奇的东西来执行 COM 魔术。我希望这可以解释为什么如果您拥有的 DLL 恰好是 COM 组件，那么您的尝试将毫无意义，根据我们可以看到的 ATL 命名很可能。

编辑： 我忘了说，如果它是带有OLE/COM Viewer 的 COM，您也可以轻松查看 dll 中的内容（通常，如果您有编译器，您将拥有这样的工具）。