Foxtable(狐表)用户栏目专家坐堂 → [求助]关于弧表识别二维码的问题


  共有6411人关注过本帖树形打印复制链接

主题:[求助]关于弧表识别二维码的问题

帅哥哟,离线,有人找我吗?
81538475
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:六尾狐 帖子:1304 积分:10534 威望:0 精华:1 注册:2018/1/20 12:40:00
[求助]关于弧表识别二维码的问题  发帖心情 Post By:2018/11/5 11:39:00 [显示全部帖子]

在论坛上看到一个帖子,提到识别二维码的方法
可是我用弧表生成的QRCODE 为什么识别出来是乱码呢,说明上说可以支持中文的。


Dim img As Image = Image.FromFile("C:\Users\cxw\Desktop\1.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)


图片点击可在新窗口打开查看此主题相关图片如下:1.jpg
图片点击可在新窗口打开查看


 回到顶部
帅哥哟,离线,有人找我吗?
81538475
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:六尾狐 帖子:1304 积分:10534 威望:0 精华:1 注册:2018/1/20 12:40:00
  发帖心情 Post By:2018/11/5 22:02:00 [显示全部帖子]

好了。多谢了

 回到顶部
帅哥哟,离线,有人找我吗?
81538475
  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:六尾狐 帖子:1304 积分:10534 威望:0 精华:1 注册:2018/1/20 12:40:00
  发帖心情 Post By:2018/11/6 11:43:00 [显示全部帖子]

如果图片识别不了,能不能有个提示,而不是报错呢。这个应该如何写呀。

 回到顶部