VB.NET如何生成和使用二维码

[kongmj]

请问如何使用VB.net根据需求生成相应的二维码和读取？ 论坛上查找了几条相关帖子，但都不会或不能用VB.net调用，最好提供VB.NET环境下的示例，谢谢！

[娃都会打酱油了]

生成二维码的你直接找C#的也可以参考啊，方法都差不多的

[threenewbee]

google搜索下 zxing.net 这个库

[十八道胡同]

https://blog.csdn.net/cdc8596/article/details/72895975

[baidu_14933765]

这是VB.NET版本

[baidu_14933765]

楼主我是用VB.NET写的生成以及解码，VB.net完全测试通过上面的图就是

[良朋]

CSDN的自动推送，你下载试试

VB生成二维码图形的控件，非常好用，含使用范例源码
https://download.csdn.net/download/sysdzw/5765435

[橘子皮...]

zxing.net 解析不了比较小的模糊的图，我试过怎么弄都失败，但是微信就可以扫出来，不知道怎么调用微信解析

[非专业开发Five]

你这是不会用语法翻译器还是卡在哪里了你到是说一下啊，你起码复制一个c#的代码自己改改试试啊，什么也不做伸手有点不好。

[nina_tang]

我以前处理过相似需求，你试一下下面的代码看看呢。不过这个要用到一款叫Spire.Barcode的组件，从这个地址下载：https://www.nuget.org/packages/FreeSpire.Barcode/

Imports Spire.Barcode

Module Module1

    Sub Main()
        Dim settings As BarcodeSettings = New BarcodeSettings
        settings.Type = BarCodeType.QRCode
        settings.Data = "Hello 123456789"
        settings.Data2D = "Hello 123456789"
        settings.QRCodeDataMode = QRCodeDataMode.AlphaNumber
        settings.X = 1.0
        settings.QRCodeECL = QRCodeECL.H
        Dim generator As BarCodeGenerator = New BarCodeGenerator(settings)
        Dim image As Image = generator.GenerateImage
        image.Save("QRCode.png")
    End Sub

End Module

[橘子皮...]

引用 14 楼 nina_tang 的回复:

我以前处理过相似需求，你试一下下面的代码看看呢。不过这个要用到一款叫Spire.Barcode的组件，从这个地址下载：https://www.nuget.org/packages/FreeSpire.Barcode/

Imports Spire.Barcode

Module Module1

    Sub Main()
        Dim settings As BarcodeSettings = New BarcodeSettings
        settings.Type = BarCodeType.QRCode
        settings.Data = "Hello 123456789"
        settings.Data2D = "Hello 123456789"
        settings.QRCodeDataMode = QRCodeDataMode.AlphaNumber
        settings.X = 1.0
        settings.QRCodeECL = QRCodeECL.H
        Dim generator As BarCodeGenerator = New BarCodeGenerator(settings)
        Dim image As Image = generator.GenerateImage
        image.Save("QRCode.png")
    End Sub

End Module

你这个为什么包含汉字转出的码就不对了呢?

[numbermax]

git上找zxing的vb.net的库。