还是斑马打印机的问题,还是没有解决,不知道怎么写这个代码!
以下是我自己写的,但是打印机没反应,请问该如何编写才能让斑马打印机打出标签啊????Private Sub ZebraPrint()
On Error GoTo cc
Open "LPT1" For Output As #1
Print #1, "打印内容"
Print #1, "打印内容"
Print #1, "打印内容"
Print #1, "打印内容"
Close #1
cc:
MsgBox "未連接打印機!", vbCritical, "提示!"
Exit Sub
End sub