|
|
本帖最后由 山中老人 于 2014-10-10 17:46 编辑
很多地方会用到，不干胶标签打印的事情，用VBA调用起来很方便，可以打条码，打文字，打黑白图片。
附件是详细使用说明，以及我测试过的最好的VBA驱动模块（TSC_TTP_驱动.bas 需要导入EXCEL、ACCESS或WORD文件中）。 当然，你首先要有一台这种打印机，并且正确安装打印驱动。
其使用原理：是通过【barcode】、【windowsfont】等 多次向DLL驱动缓存，叠加写入同一副位图图像，最后一次性打印最终位图。
你只需要写个简单的代码就可以调用了！
VBA调用代码范本：
‘---------------------------------------------------------------------
Public Sub 条码打印1(打印机 As String, 条码 As String, 附带字符 As String, Optional 份数 As Long = 1)
Call openport(打印机) ‘打开打印机驱动DLL
Call setup("50", "27", "10", "8", "0", "3", "0") '设置打印的 标签（纸张）格式
Call clearbuffer '清空缓存
'---------设置打印内容----------
Call barcode("10", "10", "128", "100", "1", "0", "2", "2", 条码) '调用打印机内部字体（128 型条形码） 写入打印内容
Call windowsfont(10, 150, 24, 0, 0, 0, "arial", 附带字符) '调用winSYS 字体 写入打印内容
'-------------------
Call printlabel("1", "" & 份数) '设置一次打印的份数
Call closeport ’关闭驱动，同时打印
End Sub
TSC_TTP_DLL说明.rar
(67.13 KB, 下载次数: 107)
TSC条码打印机DLL调用方法.rar
(1.94 MB, 下载次数: 165)
|
评分
-
1
查看全部评分
-
|
沪公网安备 31011702000001号 沪ICP备11019229号-2
发表于 2014-10-10 16:55
