请高手指教,打印机程序问题
为什么我写的打印机程序在自家的喷墨打印机上能打印,但在别的电脑所连接的针式打印机却报一个"error "380" ",写的代码如下:
Public Sub PrnData()
Dim printWidth, printHeight
Printer.PaperSize = vbPRPSA4
Printer.Width = 12830
Printer.Height = 7668
Printer.FontSize = 12
printWidth = Printer.Width
printHeight = Printer.Height
Printer.CurrentX = (printWidth - 9920)
Printer.CurrentY = (printHeight - 6200)
Printer.Print Label2.Caption
Printer.EndDoc
End Sub