EmguCV学习笔记 VB.Net 12.1 二维码解析

版权声明:本文为博主原创文章,转载请在显著位置标明本文出处以及作者网名,未经作者允许不得用于商业目的。

EmguCV是一个基于OpenCV的开源免费的跨平台计算机视觉库,它向C#和VB.NET开发者提供了OpenCV库的大部分功能。

教程VB.net版本请访问: EmguCV学习笔记 VB.Net 目录-CSDN博客

教程C#版本请访问: EmguCV学习笔记 C# 目录-CSDN博客

笔者的博客网址:https://blog.csdn.net/uruseibest

教程配套文件及相关说明以及如何获得pdf教程和代码,请移步: EmguCV学习笔记

学习VB.Net知识,请移步: vb.net 教程 目录_vb中如何用datagridview-CSDN博客

学习C#知识,请移步: C# 教程 目录_c#教程目录-CSDN博客

12.1 二维码解析

QRCodeDetector类是Emgu CV库中用于检测和解码二维码的类。

常用方法:

1、Detect方法:检测图像中的QR二维码

Public Function Detect (input As IInputArray, points As IOutputArray) As Boolean

参数说明:

  1. Input:包含二维码的输入图像。
  2. points:存储QR二维码位置信息。这是一个VectorOfPoint对象。

该方法执行成功,将返回二维码四个顶点坐标。

【代码位置:frmChapter12】Button1_Click

'二维码检测

Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click

Dim qr As New QRCodeDetector()

'需要测试的图像文件

Dim m As New Mat("C:\learnEmgucv\qrcode1.png", ImreadModes.Color)

Dim vp As New VectorOfPoint

'返回二维码四个顶点坐标

If qr.Detect(m, vp) = False Then

Exit Sub

End If

CvInvoke.Line(m, vp(0), vp(1), New MCvScalar(255, 0, 0), 2)

CvInvoke.Line(m, vp(1), vp(2), New MCvScalar(255, 0, 0), 2)

CvInvoke.Line(m, vp(2), vp(3), New MCvScalar(255, 0, 0), 2)

CvInvoke.Line(m, vp(3), vp(0), New MCvScalar(255, 0, 0), 2)

ImageBox1.Image = m

End Sub

输出结果如下图所示:

图12-1 获得二维码坐标位置

2、Decode方法:用于解码获得的QR二维码的内容。

Public Function Decode (image As IInputArray, points As IInputArray, Optional straightQrcode As IOutputArray = Nothing) As String

  1. Image:包含二维码的输入图像。
  2. points:存储QR二维码位置信息。
  3. straightQrcode:经过校正后的二维码图像。

该法方法执行成功,将返回二维码的文字内容。

【代码位置:frmChapter12】Button2_Click

'二维码识别

Private Sub Button2_Click(sender As Object, e As EventArgs) Handles Button2.Click

Dim qr As New QRCodeDetector()

'需要测试的图像文件

Dim m As New Mat("C:\learnEmgucv\qrcode2.png", ImreadModes.Color)

Dim vp As New VectorOfPoint

'返回二维码四个顶点坐标

If qr.Detect(m, vp) = False Then

Exit Sub

End If

Dim mout1 As Mat = m.Clone

CvInvoke.Line(mout1, vp(0), vp(1), New MCvScalar(255, 0, 0), 2)

CvInvoke.Line(mout1, vp(1), vp(2), New MCvScalar(255, 0, 0), 2)

CvInvoke.Line(mout1, vp(2), vp(3), New MCvScalar(255, 0, 0), 2)

CvInvoke.Line(mout1, vp(3), vp(0), New MCvScalar(255, 0, 0), 2)

ImageBox1.Image = mout1

Dim strout As String

Dim mout2 As New Mat

strout = qr.Decode(m, vp, mout2)

ImageBox2.Image = mout2

MessageBox.Show(strout)

End Sub

输出结果如下图所示:

图12-2 获得二维码信息

QRCodeDetector类也提供了同时对多个二维码检测和解码的方法,但是经过测试,效果不好。可以使用WeChatQRCode类来代替(请参看12.2节【WeChatQRCode】)。

相关推荐
千宇宙航12 分钟前
闲庭信步使用SV搭建图像测试平台:第二十七课——图像的腐蚀
图像处理·计算机视觉·fpga开发
圆滚滚肉肉1 小时前
后端MVC(控制器与动作方法的关系)
后端·c#·asp.net·mvc
CoovallyAIHub1 小时前
YOLOv13都来了,目标检测还卷得动吗?别急,还有这些新方向!
深度学习·算法·计算机视觉
ajassi20002 小时前
开源 C# .net mvc 开发(六)发送邮件、定时以及CMD编程
linux·开源·c#·mvc
我是唐青枫2 小时前
C#.NET NLog 详解
开发语言·c#·.net
向宇it2 小时前
【unity游戏开发——网络】网络游戏通信方案——强联网游戏(Socket长连接)、 弱联网游戏(HTTP短连接)
网络·http·游戏·unity·c#·编辑器·游戏引擎
txwtech2 小时前
第10.4篇 使用预训练的目标检测网络
人工智能·计算机视觉·目标跟踪
音视频牛哥3 小时前
计算机视觉的新浪潮:扩散模型(Diffusion Models)技术剖析与应用前景
人工智能·计算机视觉·ai·音视频·实时音视频·扩散模型
爆改模型3 小时前
【arXiv2025】计算机视觉|即插即用|LBMamba:革新视觉模型效率,性能炸裂
人工智能·计算机视觉
一线码农3 小时前
MinHook 如何对 .NET 母体 CoreCLR 进行拦截
c#·.net·代码注入