you can use QRCode package to generate QRCode image
install the package: Install-Package QRCoder
usage:
Dim qrGenerator As QRCodeGenerator = New QRCodeGenerator()
Dim qrCodeData As QRCodeData = qrGenerator.CreateQrCode("The text which should be encoded.", QRCodeGenerator.ECCLevel.Q)
Dim qrCode As QRCode = New QRCode(qrCodeData)
Dim qrCodeImage As Bitmap = qrCode.GetGraphic(20)
Using ms As MemoryStream = New MemoryStream
qrCodeImage.Save("image file location", ImageFormat.Bmp)
End Using
与恶龙缠斗过久,自身亦成为恶龙;凝视深渊过久,深渊将回以凝视…