我将代码写到按钮click事件中，运行时出现下图
请老师帮助解决
代码：
Dim img As Image = Image.FromFile("C:\Users\Administrator\Desktop\b1.jpg") ’图片地址哦！
Dim bmap As Bitmap
bmap = New Bitmap(img)
Dim source As New RGBLuminanceSource(bmap, bmap.Width, bmap.Height)
Dim bitmap As com.google.zxing.BinaryBitmap = New com.google.zxing.BinaryBitmap(New com.google.zxing.common.GlobalHistogramBinarizer(source))
Dim asd As new com.google.zxing.MultiFormatReader
Dim result As com.google.zxing.Result = asd.decode(bitmap)
MessageBox.Show(result.Text)
[此贴子已经被作者于2024/9/4 11:29:53编辑过]
加好友 
发短信
Post By：2024/9/4 11:04:00 [显示全部帖子]
