夹江78526部队视频:谁有vb打印的代码

来源:百度文库 编辑:杭州交通信息网 时间:2024/04/27 18:03:10
对了,如果谁知道打印机控件的各种属性方法也可以

window.print

http://zhidao.baidu.com/question/9753840.html
请参考如上网址本人对问题的答复。

'设置打印,要在窗体上加载PrintDialog,PrintDocument两个控件
Private Sub MenuItem11_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MenuItem11.Click
PrintDialog1.Document = PrintDocument1
Dim result As DialogResult = PrintDialog1.ShowDialog()
If result = Windows.Forms.DialogResult.OK Then
PrintDocument1.Print()
End If
End Sub
'页面设置
Private Sub MenuItem9_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MenuItem9.Click
Dim pgSettings As New Printing.PageSettings
PageSetupDialog1.PageSettings = pgSettings
PageSetupDialog1.ShowDialog()
End Sub