显示打印对话框

Montaque(Rain Man=Rainman)  http://search.csdn.net/Expert/topic/1756/1756799.xml?temp=.8004572

加一个printdialog到form上，然后调用  

printDialog1.ShowDialog()  

---------------------------------------------------------------  

Dim  pt  As  Printing.PrintDocument  

               Me.PrintDialog1.Document  =  pt  

               Me.PrintDialog1.ShowDialog(Me)  

---------------------------------------------------------------  

Dim  pd  As  Printing.PrintDocument  

pd.DefaultPageSettings  =  PageSetupDialog1.PageSettings  '页面设置  

PrintDialog1.Document  =  pt  

PrintDialog1.ShowDialog

本文由来源 21aspnet，由 javajgs_com 整理编辑，其版权均为 21aspnet 所有，文章内容系作者个人观点，不代表 Java架构师必看 对观点赞同或支持。如需转载，请注明文章来源。