当前位置: 代码迷 >> VB Dotnet >> VB.NET 打印预览设立
  详细解决方案

VB.NET 打印预览设立

热度:50   发布时间:2016-04-25 02:04:44.0
VB.NET 打印预览设置
在网上找到的打印代码,页面设置与打印预览不同步!页面设置里设置横向,打印预览里还是纵向。
请老师们指点~

Private WithEvents PageSetupDialog1 As New System.Windows.Forms.PageSetupDialog '打印机页面设置
    Private WithEvents PrintPreviewDialog1 As New System.Windows.Forms.PrintPreviewDialog '打印预览
    Private WithEvents pd As New PrintDocument()
 '打印预览
    Public Sub printPreview()
        Me.PrintPreviewDialog1.Document = pd
        Me.PrintPreviewDialog1.WindowState = FormWindowState.Maximized
        Me.PrintPreviewDialog1.ShowDialog()
    End Sub
    '页面设置
    Public Sub PageSetup()
        Me.PageSetupDialog1.Document = pd
        pd.DefaultPageSettings = Me.PageSetupDialog1.PageSettings
    End Sub
    '打印
    Public Sub Print()
        pd.Print()
    End Sub

------解决思路----------------------
Me.PrintPreviewDialog1.ShowDialog()
之后,你得把选择之后的样式赋值给Document啊
否则你这show与不show有什么区别,show出来给人看一眼就完了?
------解决思路----------------------
而且你应该判断DialogResult
用户到底是点了确定还是取消

否则人家本来取消了更改,你也把刚才选的赋值上去
  相关解决方案