vb.net 教程 11-1 打印组件 2 PrintDialog 1

╰+哭是因爲堅強的太久メ 2022-09-11 07:11 146阅读 0赞

版权声明：本文为博主原创文章，转载请在显著位置标明本文出处以及作者网名，未经作者允许不得用于商业目的。  
上一节将PrintDocument、PageSetupDialog、PrintDialog、PrintPreviewDialog的重要属性/方法进行了个罗列。

本节开始正式学习这些组件的使用。

PageSetupDialog组件的使用，本节暂时不讲实际打印

设计时窗体如图（请自行添加PrintDialog组件）：

直接上代码分析：

Private Sub Button1\_Click(sender As Object, e As EventArgs) Handles Button1.Click  
        Dim ps As Printing.PrinterSettings  
        If PrintDialog1.ShowDialog = DialogResult.OK Then  
            ps = PrintDialog1.PrinterSettings  
        Else  
            Exit Sub  
        End If  
        TextBox1.Text = "打印机名称：" & ps.PrinterName & ControlChars.CrLf &  
            "支持双面打印：" & IIf(ps.CanDuplex, "是", "否") & ControlChars.CrLf &  
             "打印份数：" & ps.Copies & ControlChars.CrLf &  
             "打印起始页：" & ps.FromPage & ControlChars.CrLf &  
             "打印终止页：" & ps.ToPage & ControlChars.CrLf &  
             "支持彩色打印：" & IIf(ps.SupportsColor, "是", "否") & ControlChars.CrLf  
    End Sub

可以看出来，打印对话框和之前将的对话框差不多，都需要 ShowDialog()

由于之前已经将重要属性方法进行了说明，这里不再讲，不明白的，请看  vb.net 教程 11-1 打印组件 1

按下按钮，出现打印对话框，我的电脑上没有真实打印机，但实际效果差不多：

![Center][]

先不管其中的灰色项目，将份数设置为4份，按下“打印”按钮：

![Center 1][]

已经将我们需要的打印机名称、打印份数显示出来了。

再将打印对话框和设计时的属性做个对比：

![Center 2][]

接下来将属性设置为True再看看效果

![Center 3][]

运行效果：

![Center 4][]

![Center 5][]

————————————————  
版权声明：本文为CSDN博主「VB.Net」的原创文[vb.net教程][vb.net]章，遵循CC 4.0 BY-SA版权协议，转载请附上原文出处链接及本声明。

[Center]: /images/20220828/f91d9f8be277460fb538014f83e05d80.png
[Center 1]: /images/20220828/700f4c7eb1174df88ad01d3d6ffa9629.png
[Center 2]: /images/20220828/924d4845ff8c49be8f90215438d1d082.png
[Center 3]: /images/20220828/805dab3c290743469022acdc8b401f37.png
[Center 4]: /images/20220828/63cf08f6e03a4bf091b303d20d6f408a.png
[Center 5]: /images/20220828/a8afc2aee4bc46ceb88913161b451f49.png
[vb.net]: https://www.xin3721.com/eschool/vbnetxin3721/