如何在 VB .NET 中建立 QR Code

IronQR

IronQR是一個功能全面且對開發者友好的程式庫，專為 .NET 應用程式量身定制，專門用於高效生成和操作二維碼。 對於希望將二維碼功能整合到 C# 或 VB.NET 專案中的開發人員來說，這是一個必備工具。 使用 IronQR 建立二維碼 VB.NET 專案要容易得多。

IronQR的主要特點包括：

1.廣泛的二維碼支援： IronQR 能夠出色地處理各種類型的二維碼。無論您使用的是標準二維碼、微型二維碼、二維碼條碼影像，甚至是 Aztec 或 Data Matrix 等特定格式，IronQR 都能滿足您的需求。 這種多樣性使其成為需要各種類型二維碼的應用的理想選擇。 2.自訂功能：使用 IronQR 可以輕鬆自訂符合特定要求的二維碼。 您可以調整關鍵參數，例如大小、糾錯等級和編碼類型。 這種靈活性確保您產生的二維碼與您的專案需求完美契合。 3.使用者友善 API： IronQR 的 API 設計簡潔易用。 即使是經驗有限的開發人員也能快速上手，用最少的程式碼行數即可開始產生二維碼，從而簡化開發流程。 4.資料編碼的多功能性：使用 IronQR，您不僅限於基本的文字或 URL。 它支援多種資料類型，包括聯絡資訊、地理資訊等。 此功能拓寬了潛在應用範圍，從電子名片到基於地理位置的服務。 5.影像產生和處理： IronQR 提供強大的功能，可將二維碼渲染成影像。 這對於需要直接顯示二維碼或將其儲存為圖像檔案以供以後使用的應用程式尤其有用。 6.豐富的文件和範例：為了幫助開發人員快速上手，IronQR 提供了詳細的文件、大量的範例和全面的教學。 這些資源對於學習庫以及在開發過程中進行故障排除都非常有價值。 7.持續維護與支援： IronQR 會定期更新，以與最新的 .NET 框架和開發最佳實務保持同步。 此外，IronSoftware 的專業支援團隊隨時準備協助開發人員解決可能遇到的任何挑戰。

在 Visual Studio 中建立 VB.NET 項目

我們首先在 Visual Studio 中建立一個新的 VB.NET 專案：

1.啟動 Visual Studio：在您的電腦上開啟 Visual Studio。 2.建立新項目：點選"建立新項目"。 3.選擇語言和項目類型：在"所有語言"標籤下選擇"Visual Basic"。 然後，選擇"控制台應用程式"以安裝控制台應用程式。 點選"下一步"。

建立一個新項目

4.配置您的專案：輸入您的專案名稱和其他所需詳細信息，然後按一下"建立"。

VB.NET 程式碼中的二維碼生成

安裝 IronQR 後，您可以在 VB.NET 應用程式中建立二維碼。 以下是幾行簡單的程式碼：

Imports System
Imports IronQr
Imports IronSoftware.Drawing

Module Program
    Sub Main(args As String())
        ' Create a QR Code object containing the desired text
        Dim myQr As QrCode = QrWriter.Write("hello world")

        ' Save QR Code as a Bitmap object in memory
        Dim qrImage As AnyBitmap = myQr.Save()

        ' Save QR Code Bitmap to a file on disk
        Try
            qrImage.SaveAs("c:/qr.png")
        Catch ex As Exception
            Console.WriteLine("Error saving the QR code: " & ex.Message)
        End Try
    End Sub
End Module

Imports System
Imports IronQr
Imports IronSoftware.Drawing

Module Program
    Sub Main(args As String())
        ' Create a QR Code object containing the desired text
        Dim myQr As QrCode = QrWriter.Write("hello world")

        ' Save QR Code as a Bitmap object in memory
        Dim qrImage As AnyBitmap = myQr.Save()

        ' Save QR Code Bitmap to a file on disk
        Try
            qrImage.SaveAs("c:/qr.png")
        Catch ex As Exception
            Console.WriteLine("Error saving the QR code: " & ex.Message)
        End Try
    End Sub
End Module

產生帶有徽標的二維碼

以下是創建帶有徽標的二維碼圖像的完整原始程式碼：

Imports System
Imports IronQr
Imports IronSoftware.Drawing

Module Program
    Sub Main(args As String())
        ' Assign a valid license key if necessary
        IronQr.License.LicenseKey = "Add-License-Key"

        ' Set QR options with high error correction and a margin
        Dim options As New QrOptions(QrErrorCorrectionLevel.High, 20)

        ' Create a QR Code object containing the desired text with options
        Dim myQr As QrCode = QrWriter.Write("greetings terra", options)

        ' Load a logo from file
        Dim logoBmp As New AnyBitmap("logo.png")

        ' Define style options including the logo
        Dim style As New QrStyleOptions With {
            .Dimensions = 300,
            .Margins = 10,
            .Color = Color.Gray,
            .Logo = New QrLogo With {
                .Bitmap = logoBmp,
                .Width = 100,
                .Height = 100,
                .CornerRadius = 2
            }
        }

        ' Save QR Code as a styled Bitmap object in memory
        Dim qrImage As AnyBitmap = myQr.Save(style)

        ' Save QR Code Bitmap to file on disk
        qrImage.SaveAs("qr_styled.png")
    End Sub
End Module

Imports System
Imports IronQr
Imports IronSoftware.Drawing

Module Program
    Sub Main(args As String())
        ' Assign a valid license key if necessary
        IronQr.License.LicenseKey = "Add-License-Key"

        ' Set QR options with high error correction and a margin
        Dim options As New QrOptions(QrErrorCorrectionLevel.High, 20)

        ' Create a QR Code object containing the desired text with options
        Dim myQr As QrCode = QrWriter.Write("greetings terra", options)

        ' Load a logo from file
        Dim logoBmp As New AnyBitmap("logo.png")

        ' Define style options including the logo
        Dim style As New QrStyleOptions With {
            .Dimensions = 300,
            .Margins = 10,
            .Color = Color.Gray,
            .Logo = New QrLogo With {
                .Bitmap = logoBmp,
                .Width = 100,
                .Height = 100,
                .CornerRadius = 2
            }
        }

        ' Save QR Code as a styled Bitmap object in memory
        Dim qrImage As AnyBitmap = myQr.Save(style)

        ' Save QR Code Bitmap to file on disk
        qrImage.SaveAs("qr_styled.png")
    End Sub
End Module

輸出結果如下：

! qr-code-vb-net-tutorial-5有關在 VB.NET 中導出生成的二維碼和條碼的更多詳細信息，請訪問此教程鏈接。