TSC TPP系列不干胶条形码打印机 VBA 调用范本及说明书！

山中老人 · 发表于 2014-10-10 16:55

本帖最后由山中老人于 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)

		自动登录	找回密码
密码			免费注册

[原创] TSC TPP系列不干胶条形码打印机 VBA 调用范本及说明书！

评分

[原创] TSC TPP系列 不干胶 条形码 打印机 VBA 调用 范本及说明书！

评分

[原创] TSC TPP系列不干胶条形码打印机 VBA 调用范本及说明书！