为了在 Visual Basic中打印
QRCode 条码 ,
你需要 Barcodesoft bcsqrcode.ttf 字体以及 cruflbcs.dll .
如果你下载并且安装了试用版 Barcodesoft
QRCode 软体 ,
你将会在以下文件夹里面发现 crUFLBCS.dll
"C:\Program Files (x86)\Common Files\Barcodesoft\Fontutil\" folder.
如果你的电脑上找不到 cruflbcs.dll 请点击以下链接下载
QRCode Barcode VB .
crUFLBCS.dll 是一个 COM object, 它有以下的 IQRCode 接口。
有关 IQRCode 接口 的详细资料, 可以从
QRCode 用户手册中找到.
为了调用 IQRCode 接口中的各种方法, 你既可以使用 Late Binding 也可以使用 Early Binding.
Late Binding
Late binding 用在编译的时候不知道所有接口信息情况下。
在Visual Basic打印
QRCode 条形码 的代码比 early binding 的情况下运行得慢一些.
但是,你的代码与 COM 的版本无关, 只要在各个函数的参数数量没有变化的情况下就可以使用.
这里是一个使用late binding 在 Visual Basic 中打印
QRCode 条形码 的示范程式。
C:\Program Files (x86)\Barcodesoft\qrcodefont\ .
Dim cruflBCSObj As Object
请对返回的字符串"retval"使用字体 BCSQRCode. 你就可以得到
QRCode 条形码 .
Early Binding
早期绑定需要客户在编译前就得到所有的接口信息.
使用早期绑定来打印
QRCode 条码 比晚期绑定的代码运行效率更高.
这里是一个使用Visual Basic打印
QRCode 条形码 的示范程式.
使用Visual Basic从以下文件夹打开 EarlyBindingSample.frm
C:\Program Files (x86)\Barcodesoft\qrcodefont\.
1. 点击菜单 Project, 选择 "Add Reference..." 来载入 cruflBCS.dll 的接口信息.
2. 使用以下代码从Visual Basic 中打印
条形码 .
Dim obj As cruflBCS.CBCSQRCode
Set obj = New cruflBCS.CBCSQRCode
cruflBCSObj.ECLevel = 2
qrcode = obj.Encode(strToEncode)
Set obj = Nothing
For more information about QR Code, please click QRCode.