VBA 中的代码 128 条码无法正常访问

Code 128 Barcode in VBA for Access not working properly

我将此线程中的代码复制到我的访问数据库中:Generating Code 128 Barcodes using Excel VBA

函数运行正常,returns修改后的字符串(以下以字符串“standard284762”为例,我的数据库唯一ID格式)

我下载了这个字体:https://dl.dafont.com/dl/?f=code_128

当我执行该函数时,它将字符串转换为:

ÑstandardÌ<O^ÈÓ

它在报告中是这样显示的:

我使用的是 Office 365 版的 Access。 我的模块名为 Code128str,我的 class 模块名为 Class1

知道导致奇怪输出的原因吗? 谁能确认代码工作正常,问题出在其他地方?

使用本页的字体:http://grandzebu.net/informatique/codbar-en/code128.htm

字体必须与代码“配对”。

字体下载:http://grandzebu.net/informatique/codbar/code128.ttf

我在安装那个版本的字体之前看到了同样的问题。