显示打印对话框

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

你可能感兴趣的:(.net,xml)