e.Form.Page.Width = 196 '纸张宽度为196毫米e.Form.Page.Height = 101.8 '纸张高度为101.8毫米
Dim doc As PrintDoc = e.Form.GernatePrintDoc()doc.AutoRotate = False '禁止自动旋转打印内容
Doc.PrinterName = "EPSON LQ-730K ESC/P2"doc.Print() '直接打印
我设的可以直接打印。。。
但一预览就出。。。我怀疑老六买打印程序有问题。。。一预览就将自定义纸张转为其他纸张。。。