共9 条记录, 每页显示 10 条, 页签:
[1]
[浏览完整版]
标题：如何解析图片中的二维码？
1楼
33chyh 发表于：2024/9/4 11:04:00老师好！我有一个带二维码的图片，
需要利用程序解析出二维码中的信息？如何编写相关代码呢？
| 下载信息 [文件大小： 下载次数： ] | |
 点击浏览该文件:黑白图片0006.zip |
需要利用程序解析出二维码中的信息？如何编写相关代码呢？
2楼
有点蓝 发表于：2024/9/4 11:12:00http://www.foxtable.com/bbs/dispbbs.asp?BoardID=2&ID=138257&skin=0
3楼
33chyh 发表于：2024/9/4 11:17:00怎样调用zxing.dll文件？
4楼
有点蓝 发表于：2024/9/4 11:18:005楼
33chyh 发表于：2024/9/4 11:19:00我想用代码调用和执行zxing.dll，不知道怎样写代码？
6楼
有点蓝 发表于：2024/9/4 11:23:002楼例子里不就有现成的代码吗
7楼
33chyh 发表于：2024/9/4 11:29:00我将代码写到按钮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编辑过]
8楼
狐狸爸爸 发表于：2024/9/4 14:07:001、可能没有引用这个库
2、如果引用了， 可能RGBLuminanceSource这个类型在某个命名空间中，你需要
Dim source As New 命名空间名称.RGBLuminanceSource(bmap, bmap.Width, bmap.Height)
9楼
33chyh 发表于：2024/9/4 15:36:00谢谢，我先按照您的指导做做
共9 条记录, 每页显示 10 条, 页签:
[1]