Private Sub scanButton_Click (event As BANanoEvent)
scanner.show
End Sub
private Sub scanner_onUnduplicatedRead(txt As String,result As TextResult)
resultLabel.Text=result.Text
SKModal1.Open
End Sub
private Sub scanner_onFrameRead(results() As TextResult)
End Sub