我正在创建VB应用程序,我想在其中打印文档,但我的所有文档都有不同的方向,其中一些是纵向,一些是横向。
我有一个功能,用户可以打印一堆文件,比如多个具有不同方向的文件。
这是我用来以编程方式设置打印机设置的代码:
Dim Printers As PrinterSettings.StringCollection
Printers = printerSettings.InstalledPrinters
Dim printerSettings As New PrinterSettings
printerSettings.DefaultPageSettings.PaperSize = pageSettings.PaperSize
printerSettings.DefaultPageSettings.PrinterResolution = pageSettings.PrinterResolution
printerSettings.DefaultPageSettings.Color = pageSettings.Color
printerSettings.DefaultPageSettings.Landscape = pageSettings.Landscape
printerSettings.DefaultPageSettings.PrinterSettings = printerSettings.DefaultPageSettings.PrinterSettings
printerSettings.DefaultPageSettings.PaperSource = pageSettings.PaperSource
我可以在这里设置方向:pageSettings.Landscape,但它只能是横向或只能是纵向。我想要被自动检测到吗?
这可能吗?
如果没有,有没有办法在使用 VB 以编程方式打印文件之前检查文件方向?
我尝试将 auto 添加到:
pageSettings.Landscape
,但它只接受 true/false。
这将使用文件中指定的方向打印文件。
Private Sub PrintFile(FileToPrint As String)
Dim myFile As New ProcessStartInfo
With myFile
.UseShellExecute = True
.WindowStyle = ProcessWindowStyle.Normal
.FileName = FileToPrint
.Verb = "Print"
End With
Process.Start(myFile)
End Sub