如何在 Visual Basic (VB.NET) 中列印 Aztec 條碼

使用 Barcodesoft BCSAztec TrueType 字型與 COM 元件，在 Visual Basic 應用程式中生成高解析度的 Aztec 條碼。

前期準備

  • BCSAztec.ttf：核心 TrueType 字型檔案。
  • cruflbcs.dll：COM 物件函式庫（位於 C:\Program Files (x86)\Common Files\Barcodesoft\Fontutil\）。
下載演示版 訂購正式版

方法 1：後期繫結 (Late Binding)

最適合版本獨立性。無需在編譯時設置引用，但執行速度略慢於前期繫結。 

' 後期繫結範例
Dim cruflBCSObj As Object
Set cruflBCSObj = CreateObject("cruflBCS.Aztec.1")

cruflBCSObj.SetCRLF(1)
cruflBCSObj.ECLevel = 23

Dim retval As String
retval = cruflBCSObj.Encode(strTemp)
' 請對回傳字串 "retval" 套用 BCSAztec 字型

方法 2：前期繫結 (Early Binding)

最適合高效能要求。需要在專案中加入對 cruflBCS.dll 型別函式庫的引用。 

' 前期繫結範例
' 1. 點選「專案」選單，選擇「加入引用」以載入 cruflBCS.dll
Dim obj As cruflBCS.CBcsAztec
Set obj = New cruflBCS.CBcsAztec

obj.ECLevel = 23
Dim qrcode As String
qrcode = obj.Encode(strToEncode)

Set obj = Nothing

重要提示：在呼叫 Encode 方法後，您必須在 UI 介面（標籤、文字方塊或報表）中將回傳的字串設定為 BCSAztec 字型，才能正確渲染條碼圖像。