I set the deviceinfo
Public MarginLeft As String="1"
Public MarginRight As String="0.5"
Public MarginTop As String="1"
Public MarginBottom As String="1"
Public PageWidth As String="29.7"
Public PageHeight As String="21"
.
DeviceInfo="& lt; DeviceInfo>" & "& lt; OutputFormat> EMF" &
"& lt; PageWidth>" & PageWidth & amp; "Cm" &
"& lt; PageHeight>" & PageHeight & amp; "Cm" &
"& lt; MarginTop>" & MarginTop & amp; "Cm" &
"& lt; MarginLeft>" & MarginLeft & amp; "Cm" &
"& lt; MarginRight>" & MarginRight & amp; "Cm" &
"& lt; MarginBottom>" & MarginBottom & amp; "Cm" &
"& lt;/DeviceInfo>"
Try to set up the
Dim printDoc As the New System. Drawing. Printing. PrintDocument ()
.
PrintDoc. PrinterSettings. DefaultPageSettings. Landscape=True
Also try to set up the
Private Sub PrintPage (ByVal sender As Object, ByVal ev As System. Drawing. Printing. PrintPageEventArgs)
Ev. PageSettings. Landscape=True
.
End Sub
, but the two methods are the transverse form pressure within the narrow into vertical A4, however, cannot be horizontal Print out content, is I use Microsoft Print to PDF printer for testing,
CodePudding user response:
Try to connect the real printer, the result is such,