VB.NETでZXingを使ってQRコード生成

詳細は以下を参照するとして
https://github.com/micjahn/ZXing.Net/tree/master/docs

VS2017で実行テスト
AndroidでQRコードreadの定番はZXingなので、ZXingをテストで使用


1.vb.netでwindowsアプリのプロジェクトを作成
2.ツール　Nugetパッケージマネージャー＞＞ソリューションのNugetパッケージマネージャ
の管理＞＞検索でZXing＞＞ZXing.netを選択しインストール
3.form1にピクチャーボックスを作成
4.ボタンを配置　以下をコーディング
        Dim Wcode As New ZXing.BarcodeWriter
        '種類
        Wcode.Format = ZXing.BarcodeFormat.QR_CODE
        '大きさ

        Wcode.Options.Height = 80
        Wcode.Options.Width = 80
        'マージン
        Wcode.Options.Margin = 1
        '文字
        Wcode.Options.Hints(ZXing.EncodeHintType.CHARACTER_SET) = "Shift_JIS"
        'エラー訂正
        Wcode.Options.Hints(ZXing.EncodeHintType.ERROR_CORRECTION) = ZXing.QrCode.Internal.ErrorCorrectionLevel.L

        '実行
        PictureBox1.Image = Wcode.Write("2019010212345678")

5.印刷の時はこのピクチャーボックスを印字

追記VB2019でも同じ手順で作成可能

追記PHPはhttps://github.com/khanamiryan/php-qrcode-detector-decoder