机房重构——报表

    在VS中报表的实现还是比较容易的,第一次机房收费时,我们用了三方工具来制作报表,相对俩说是比较麻烦的,我们来看一下,VS中是如何制作报表的。


    第一步:添加数据集

    机房重构——报表_第1张图片


    第二步:根据向导,新建连接,输入相关信息。

    机房重构——报表_第2张图片


    下一步:

    机房重构——报表_第3张图片


    下一步:

    机房重构——报表_第4张图片


    之后一直下一步,选择select 语句进行显示

    机房重构——报表_第5张图片


    

    第三步,添加报表

    机房重构——报表_第6张图片


   第四步,选择新建的报表,右击添加表,选择数据集属性

    


    下一步,为报表添加对应的字段

    机房重构——报表_第7张图片


    第五步,添加报表容器。

    机房重构——报表_第8张图片


    至此,大功告成,下面以周结账单为例,展示部分代码

    

<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>

    这只是一个简单的实现功能,原来看过一个师哥的博客,报表设计的特别漂亮,合作的 时候要加油了!

你可能感兴趣的:(机房重构——报表)