Question

这篇文章与此之前的帖子有关： RFID Programming With VB.NET

感谢Mark的回答，我已经将它们更改为整数（因为当端口长但dc_init为Integer时它不匹配）我决定用Integer更改所有内容。它有效。

现在，我有另一个问题。在dc_init工作之后（在我将这些数据类型更改为整数之后）我在调用dc_cards函数时遇到问题。

有关dc_init功能的更多信息，我还包括手册文件（来自RFID入门包）

以下是您需要查看的内容： Download

对不起，我无法解释更具体的问题，因为我无法发布图片，只有2个链接，我可以包括。也许通过下载上面的东西会有所帮助。它包括我在VB.NET中的项目，以及VB6示例程序（它工作且完全没有错误），dcrf32.dll文件（将它们复制到system32，用于RFID的驱动程序）。

我在VB.NET中根据VB6示例程序（来自初学者包）进行此操作，但是自从将VB6迁移到VB.NET以来，它有点困难。

我对这段代码很奇怪，我从来没有学过它，也不知道该怎么做。也许马克可以在我的情况下帮助我。非常感谢。

Answer 1

dc_card功能声明应为：

Declare Auto Function dc_card Lib "dcrf32.dll" (ByVal icdev As Integer, ByVal mode as Short, snr As Integer) As Short

你应该传递你从dc_init函数获得的icdev，模式为0，你的信息将在snr变量中，状态将在st。

st = dc_card(ByVal icdev, cardmode, snr)

你声明中的

：

Dim snr, tagtype as Integer
Dim cardmode as Short

...