从 VB 调用非托管 DLL答案

【问题标题】：Calling Unmanaged DLL from VB从 VB 调用非托管 DLL
【发布时间】：2010-11-02 14:26:47
【问题描述】：

我在查找在 VB.NET 中对非托管 DLL 进行函数调用的语法时遇到了一些麻烦。有谁熟悉这个吗？

让我们假设在非托管 DLL“Connector.DLL”中有一个“Connected”函数。我想通过创建一个抽象函数调用来调用这个函数。

我看到了一些看起来像

的代码

[DllImport("Connector.DLL")]
Public Shared Function Connect(ByVal intPort)

但是那个语法对我不起作用。

【问题讨论】：

看起来您使用的属性语法不正确。 VB 中的属性需要包含在尖括号中，并且必须与函数声明在同一行。查看 MSDN (msdn.microsoft.com/en-us/library/…) 或 pinvoke.net 获取示例。

【解决方案1】：

你签出pinvoke.net了吗？

【讨论】：

【解决方案2】：

试试下面的代码。

Public Declare Function Connect Lib "Connector.DLL" (<MarshalAs(UnmanagedType.I4)> ByVal intPort As Integer) As Integer

【讨论】：

【解决方案3】：

在 Visual Studio 中，添加对此 Dll 的引用。

在代码中：

Dim vr as new COMDllClass()
vr.FunctionInDll()

编辑每条评论：

试试这个代码：

<DllImport("Connector.DLL")> _
Public Shared Function Connect(ByVal intPort)

【讨论】：