做了一个窗口打印,需要打印一下二维码,设置了一下打印区域。 Dim grp As WinForm.GroupBox = e.Form.Controls("打印区域2")
'e.Form.Page.Width = 80
'e.Form.Page.Height = 40
'e.Form.Page.LeftMargin = 0
'e.Form.Page.TopMargin = 0
Dim doc As PrintDoc = e.Form.GernatePrintDoc(grp)
Doc.AutoRotate = False
doc.PageSetting.Width = 80 '纸张宽度为100毫米
doc.PageSetting.Height = 40 '纸张高度为120毫米
doc.PageSetting.LeftMargin = 0
doc.PageSetting.RightMargin = 0
doc.PageSetting.TopMargin = 0
doc.PageSetting.BottomMargin = 0
' doc.PageSetting.Landscape = True
'doc.AutoRotate = False
doc.PrinterName = "TTP-245"
doc.Preview()
发现有一个问题,就是打印预览的时候,这个打印区域始终调整到纸张的最边上。
打印机也已经把页边距设置为0了。
请问这个如何解决?