使用 VB.NET 进行 RFID 编程

Question

我正在尝试在我的期末项目中使用 RFID 非接触式智能卡（T8/D8 系列）。 但我在访问表单中的 dcrf32.dll 文件时遇到问题。

RFID 包中包含 3 个东西（因此：12 个智能卡、一个 USB 端口和一张驱动程序 CD）

在驱动程序 CD 中，有很多某种编程语言的示例项目，除了 VB.NET，我尝试了其中一个一，这就是工作。

有一个名为“win32-dl​​l”的文件夹，里面有3个文件（dcrf32.dll，dcrf32.h，dcrf32.lib） 。我必须将它们全部复制到我想要使用的每个示例程序中。

他们也有 VB.6 中的示例，当我尝试运行它时，没有任何问题。有用。 （我还将这 3 个 dcrf 文件放在 %windows%\System32 文件夹中）。

但是，当我尝试使用 Visual Studio 2010 并使用 VB.NET 编程语言构建自己的项目时，我在调用 dcrf32.dll 文件时遇到问题。

我将VB6源代码迁移到VB.NET，向dc_init函数提供参数时出现错误。 有人可以帮助我吗？我的错在哪里？

以下是对解决我的问题很重要的链接： 这里

我只需要第一个按钮的帮助，而你不需要不必像 VB 6 示例程序中那样帮助我使用其他按钮。

我只是想知道如何连接 dcrf32 文件，以及为什么在 VB.NET 中它有错误，但在 VB 6 中它工作正常。

我想知道。

Answer 1

您遇到的问题是处理声明函数以及 VB.Net 中整数和长整型等的大小发生变化的事实。查看此链接和此代码项目有关使用 PInvoke 的文章。

即VB6中的整数是VB.Net中的Short，VB6中的Long是VB.Net中的整数。声明中的 % 是一个 VB6 整数，将变成一个短值。

Declare Auto Function dc_init Lib "dcrf32.dll" (ByVal port as Short, ByVal baud As Integer) As Integer
Declare Auto Function dc_exit Lib "dcrf32.dll" (ByVal icdev As Integer) As Short
Declare Auto Function dc_request Lib "dcrf32.dll" (ByVal icdev As Integer, ByVal mode as Short, tagtype As Integer) As Short
Declare Auto Function dc_anticoll Lib "dcrf32.dll" (ByVal icdev As Integer, ByVal bcnt as Short, snr As Integer) As Short

...