1. 程式人生 > >機房重構——報表

機房重構——報表

連接 屬性 facade strong fill add handle cad sel

在VS中報表的實現還是比較easy的。第一次機房收費時,我們用了三方工具來制作報表,相對倆說是比較麻煩的,我們來看一下,VS中是怎樣制作報表的。


第一步:加入數據集

技術分享


第二步:依據向導,新建連接,輸入相關信息。

技術分享


下一步:

技術分享


下一步:

技術分享


之後一直下一步,選擇select 語句進行顯示

技術分享


第三步,加入報表

技術分享


第四步。選擇新建的報表,右擊加入表。選擇數據集屬性

技術分享


下一步,為報表加入相應的字段

技術分享

watermark/2/text/aHR0cDovL2Jsb2cuY3Nkbi5uZXQv/font/5a6L5L2T/fontsize/400/fill/I0JBQkFCMA==/dissolve/70/gravity/Center" width="699" height="129" >


第五步,加入報表容器。

技術分享


至此。大功告成,以下以周結賬單為例,展示部分代碼

<span style="font-size:18px;"><strong>Private Sub cmdQuery_Click(sender As Object, e As EventArgs) Handles cmdQuery.Click
        Dim dateinfo As New Entity.DayWeekEntity
        Dim dayweekfac As New Facade.DayWeekFac
        Dim table As DataTable

        dateinfo.StartDate = Format(DTPstart.Value, "yyyy-MM-dd")
        dateinfo.StopDate = Format(DTPstop.Value, "yyyy-MM-dd")
        'table為依據查詢條件返回的datatable
        table = dayweekfac.GetWeekInfo(dateinfo)

        Dim rptDataSource As New ReportDataSource  '聲明數據源對象
        rptDataSource.Name = "DataSet1" '設置報表數據集名稱
        rptDataSource.Value = table '設置數據源實例
        ReportViewer1.LocalReport.ReportEmbeddedResource = "WindowsApplication1.CheckDayWeek.rdlc"

        ReportViewer1.LocalReport.DataSources.Clear()
        ReportViewer1.LocalReport.DataSources.Add(rptDataSource)

        Me.ReportViewer1.RefreshReport()
    End Sub</strong></span>

這僅僅是一個簡單的實現功能,原來看過一個師哥的博客,報表設計的特別美麗,合作的 時候要加油了!

機房重構——報表