Vb.net 打印不带预览视图和不带预览浏览器视图的报告

Vb.net 打印不带预览视图和不带预览浏览器视图的报告,vb.net,devexpress,xtrareport,Vb.net,Devexpress,Xtrareport,如何在没有预览的情况下打印报表,并使用默认的本地打印机? 我尝试将此代码行放入,但不起作用: Dim rep As New XtraReport1() rep.DataSource = DataSet rep.CreateDocument() rep.Print() 谢谢我用以下代码解决了我的问题: Imports DevExpress.XtraReports.UI Imports System.IO Imports DevExpress.XtraPrinting Imports System

如何在没有预览的情况下打印报表,并使用默认的本地打印机? 我尝试将此代码行放入,但不起作用:

Dim rep As New XtraReport1()
rep.DataSource = DataSet
rep.CreateDocument()
rep.Print()

谢谢

我用以下代码解决了我的问题:

Imports DevExpress.XtraReports.UI
Imports System.IO
Imports DevExpress.XtraPrinting
Imports System.Data
Imports System.Drawing

Partial Class TPV_Tickets
    Inherits System.Web.UI.Page
    Protected Sub Page_Load(sender As Object, e As System.EventArgs) Handles Me.Load
        Dim Report As New TicketTPV

       ' THIS IS TO TAKE THE DEFAULT LOCAL PRINT
        Dim instance As New Printing.PrinterSettings
        Dim DefaultPrinter As String = instance.PrinterName

        ' THIS IS TO PRINT THE REPORT
        Report.PrinterName = DefaultPrinter
        Report.CreateDocument()
        Report.PrintingSystem.ShowMarginsWarning = False
        Report.Print()

    End Sub
End Class

可能重复的你好,你链接的问题不完全是我需要的,它不与我的代码,但谢谢你。