如何在 Microsoft Access 中生成 Aztec 码

使用 Barcodesoft 字体和 MS Access VBA 集成高容量二维矩阵条码的分步开发指南。

什么是 Aztec 码？

Aztec 码 是一种坚固的二维矩阵条码符号，以其高容量的数据编码能力而闻名。与传统条码不同，它能高效处理标准 ASCII 和扩展 ASCII 字符，因此非常适合医疗保健、运输和票务行业。

1 注册 crUFLbcs.dll

安装演示版并打开 DOS 提示符（Win 7/10/11 请以管理员身份运行）。运行以下命令注册 DLL：

CD C:\Program Files (x86)\Common Files\Barcodesoft\FontUtil
regsvr32 crUFLbcs.dll

2 启用宏安全性

为了允许生成条码，请调整宏设置。在 Access 2007-2019+ 中，请导航至：

Access 选项 » 信任中心 » 信任中心设置 » 宏设置 » 启用所有宏

3 VBA 配置与引用

按 ALT + F11 打开 Visual Basic 编辑器。
前往 工具 » 引用，点击“浏览”，找到 cruflbcs.dll。
勾选 crUFLBcs 4.0 Type Library。
按 CTRL + M 导入 barcodesoft.bas。

VBA 代码片段

Public Function Aztec(strToEncode As String) As String
    Dim obj As cruflBCS.CAztec
    Set obj = New cruflBCS.CAztec
    Aztec = obj.EncodeCR(strToEncode, 0, 0, 0)
    Set obj = Nothing
End Function

4 渲染 Aztec 条码

在设计视图中创建一个文本框，并在其 控件来源 中使用您的表名和字段名设置如下宏：

=Aztec([表名.字段名])

最后，右键点击文本框，选择属性，并将字体设置为 BcsAztec。