基于VB.NET的射频识别编程

Question

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

RFID包中包含3样东西(因此: 12个智能卡、一个usb端口和一张驱动程序CD)

在驱动程序光盘中，除了VB.NET之外，还有很多其他编程语言的示例项目，我逐一进行了尝试，这就是工作。

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

​

他们在VB.6中也有例子，当我尝试运行它时，根本没有问题。它起作用了。(我还将这3个dcrf文件放在了%windows%\System32文件夹中)。

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

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

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

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

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

我很好奇。

Answer 1

您遇到的问题是如何处理声明函数，以及VB.Net中整数和长整型等的大小发生了变化。看看这个Link和这个使用PInvoke的代码项目Article。

也就是说，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

...