我想列印收據而不顯示列印預覽視窗。是否有可能讓它列印到連接到PC的默認列印機上而不顯示列印預覽?
這是我目前的代碼:
Private Sub BTPRINT_Click(sender As Object, e As EventArgs) Handles BTPRINT. 點擊
Dim dt As New DataTable.
With dt
.Columns.Add("Articulo")
.Columns.Add("Cantidad")
.Columns.Add("Precio")
結束 與
For Each dgr AsDataGridViewRow In Me.DataGridView1.Rows
dt.Rows.Add(dgr.Cells(0).Value, dgr.Cells(1).Value, dgr.Cells(2) .Value)
下一步。
Dim reportdocument As CrystalDecisions.CrystalReports.Engine.ReportDocument
reportdocument = New CrystalReport2
reportdocument.SetDataSource(dt)
Form3.CrystalReportViewer1.ReportSource = reportdocument
Form3.ShowDialog()
Form3.Dispose()
End Sub
uj5u.com熱心網友回復:
這是很簡單的。
我洗掉了:
Form3.ShowDialog()
Form3.Dispose()
并將其替換為:
reportdocument.PrintToPrinter(0, False, 1, 1)
轉載請註明出處,本文鏈接:https://www.uj5u.com/qianduan/325301.html
標籤:
上一篇:用于回圈的熊貓樣式無法正常作業
