摩托罗拉扫描仪SDK BarcodeEvent触发器

Question

在这方面的任何帮助都非常感谢-

我在VB .NET中启动BarcodeEvent遇到了麻烦，扫描仪是在USB(IBM掌上电脑)模式下运行的，C#样例应用程序运行正常。此外，我能够在VB .net中使扫描仪发出蜂鸣声，因此驱动程序工作正常。我可能把这段C#代码转换成VB时搞砸了

cCoreScannerClass.BarcodeEvent += new
_ICoreScannerEvents_BarcodeEventEventHandler(OnBarcodeEvent);

void OnBarcodeEvent(short eventType, ref string pscanData)
{
    string barcode = pscanData;
    this.Invoke((MethodInvoker)delegate { textBox1.Text = barcode; });
}

--以下是我的代码：

Imports CoreScanner
Imports System.Collections.Generic
Imports System.Text

Public Class Form1

    Public WithEvents cCoreScannerClass As CCoreScannerClass

    Sub Main()

        cCoreScannerClass = New CCoreScannerClass
        Dim scannertype(1) As Short
        scannertype(0) = 1
        Dim numberOfScannerTypes As Short
        numberOfScannerTypes = 1
        Dim status As Integer

        cCoreScannerClass.Open(0, scannertype, numberOfScannerTypes, status)

        AddHandler cCoreScannerClass.BarcodeEvent, AddressOf OnBarcodeEvent

        Dim opcode As Integer = 1001
        Dim outXML As String 
        Dim inXML = "<inArgs>" +
                       "<cmdArgs>" +
                           "<arg-int>1</arg-int>" +
                           "<arg-int>1</arg-int>" +
                       "</cmdArgs>" +
                    "</inArgs>"

        cCoreScannerClass.ExecCommand(opcode, inXML, outXML, status)

    End Sub

    Public Sub OnBarcodeEvent(eventType As Short, ByRef pscanData As String) Handles cCoreScannerClass.BarcodeEvent
        MsgBox("Success!")
    End Sub

Answer 1

在处理完所有事件之后，这段完全相同的VB .net代码突然开始工作。我猜扫描仪是在我执行重启事件时恢复正常的。没有一个用于摩托罗拉corescanner类的VB .net示例，所以欢迎您:)