Чтение QR-кода
Я загрузил Refinery.Barcodes.Reader.dll
, и я использую это:
Imports BusinessRefinery.Barcodes.Reader
Partial Class _Default
Inherits System.Web.UI.Page
Protected Sub btnread_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles btnread.Click
Dim barcodes As String() = BarCodeReader.scanBarCode("D://QRSAMPLE.png", BusinessRefinery.Barcodes.Reader.BarCodeType.QRCODE)
End Sub
End Class
Работает нормально; ошибки не выбрасываются. Но как мне увидеть результат процесса декодирования?
1 ответ
Попробуйте добавить myTextBox.Text = barcodes
перед End Sub
,
редактировать:
После просмотра комментариев я думаю, что вы столкнулись с тем, что scanBarCode возвращает массив, а не строку. Проверьте это и попробуйте что-то вроде этого:
Imports BusinessRefinery.Barcodes.Reader
Partial Class _Default
Inherits System.Web.UI.Page
Protected Sub btnread_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles btnread.Click
Dim barcodes As String() = BarCodeReader.scanBarCode("D://QRSAMPLE.png", BusinessRefinery.Barcodes.Reader.BarCodeType.QRCODE)
myTextbox.Text = barcodes(0)
End Sub
End Class