VB6.0编写了一个套打程序,在hpM1005一体机上打印不出后半部
VB6.0编写了一个套打程序,使用自定义纸张,在用HP_m1005一体打印时后面的总是打印不出来,但是我用HP1080\HP1000打印都没问题。在使用HP_m1005打印时总是需要在打印机上按“ok”键。已知不是打印机问题,因为我使用金碟的财务软件套打凭证时没有此问题,请老师、高手们指教。谢谢,下面是“打印”按钮的部分代码:
Private Sub Command1_Click()
If Printers.Count < 1 Then
MsgBox (" 没有安装打印机 ")
Command2.SetFocus
Exit Sub
End If
If Option1 Then
Printer.Orientation = 1
Else
Printer.Orientation = 2
End If
Printer.ScaleMode = 6
Printer.Width = 226
Printer.Height = 80
Printer.PaperSize = vbPRPSUser
Printer.ScaleLeft = Val(Trim(Text23.Text))
Printer.ScaleTop = Val(Trim(Text24.Text))