在RDLC报告上打印数据而不显示预览

问题描述

我正在处理POS项目，并且可以打印发票，但是很遗憾，它需要手动单击RDLC Reportviewer上的“打印”按钮。谁能帮帮我吗。 这是我的代码。

`导入MySql.Data.MySqlClient 导入Microsoft.Reporting.WinForms 公共类frmReceiptPrint 私有Sub frmReceiptPrint_Load（作为对象发送，作为EventArgs发送）处理MyBase.Load

    Me.ReportViewer1.RefreshReport()
End Sub
Sub loadBillReport()
    Me.ReportViewer1.RefreshReport()
    'Dim Billing = Admin.txtSbilling.Text
    Dim dt As New DataTable
    Using con As New MySqlConnection("server=localhost;userid=root;password=;database=goldbar")
        con.Open()
        Using cmd As New MySqlCommand("Select Product,Qty,Price,Sub from tbl_trans where ReceiptNo = '" & Cashier.lbReceipt.Text & "'",con)
            Dim da As New MySqlDataAdapter
            da.SelectCommand = cmd
            da.Fill(dt)
        End Using
    End Using
    With Me.ReportViewer1.LocalReport
        .ReportPath = Application.StartupPath & "\Reports\rptReceipt.rdlc"
        .DataSources.Clear()
        .DataSources.Add(New Microsoft.Reporting.WinForms.ReportDataSource("DataSet1",dt))
    End With
    With Cashier
        Dim pPetcha As New ReportParameter("pDate",.lbDate.Text)
        Dim pOras As New ReportParameter("pTime",.lbTime.Text)
        Dim receipt As New ReportParameter("pReceipt",.lbReceipt.Text)
        Dim user As New ReportParameter("pUser",.lbUser.Text)

        ReportViewer1.LocalReport.SetParameters(pPetcha)
        ReportViewer1.LocalReport.SetParameters(pOras)
        ReportViewer1.LocalReport.SetParameters(receipt)
        ReportViewer1.LocalReport.SetParameters(user)
    End With

    With frmPayment
        Dim Total As New ReportParameter("pTotal",.txtTotal.Text)
        Dim Cash As New ReportParameter("pCash",.txtCash.Text)
        Dim pChange As New ReportParameter("pChange",.txtChange.Text)

        ReportViewer1.LocalReport.SetParameters(Total)
        ReportViewer1.LocalReport.SetParameters(Cash)
        ReportViewer1.LocalReport.SetParameters(pChange)
    End With



    ReportViewer1.SetDisplayMode(Microsoft.Reporting.WinForms.DisplayMode.PrintLayout)
    'ReportViewer1.PrintDialog()

End Sub

结束课程`

解决方法

暂无找到可以解决该程序问题的有效方法，小编努力寻找整理中！

如果你已经找到好的解决方法，欢迎将解决方案带上本链接一起发送给小编。

小编邮箱:dio#foxmail.com (将#修改为@）