- 1、本文档共8页,可阅读全部内容。
- 2、原创力文档(book118)网站文档一经付费(服务费),不意味着购买了该文档的版权,仅供个人/单位学习、研究之用,不得用于商业用途,未经授权,严禁复制、发行、汇编、翻译或者网络传播等,侵权必究。
- 3、本站所有内容均由合作方或网友上传,本站不对文档的完整性、权威性及其观点立场正确性做任何保证或承诺!文档内容仅供研究参考,付费前请自行鉴别。如您付费,意味着您自己接受本站规则且自行承担风险,本站不退款、不进行额外附加服务;查看《如何避免下载的几个坑》。如果您已付费下载过本站文档,您可以点击 这里二次下载。
- 4、如文档侵犯商业秘密、侵犯著作权、侵犯人身权等,请点击“版权申诉”(推荐),也可以打举报电话:400-050-0827(电话支持时间:9:00-18:30)。
- 5、该文档为VIP文档,如果想要下载,成为VIP会员后,下载免费。
- 6、成为VIP后,下载本文档将扣除1次下载权益。下载后,不支持退款、换文档。如有疑问请联系我们。
- 7、成为VIP后,您将拥有八大权益,权益包括:VIP文档下载权益、阅读免打扰、文档格式转换、高级专利检索、专属身份标志、高级客服、多端互通、版权登记。
- 8、VIP文档为合作方或网友上传,每下载1次, 网站将根据用户上传文档的质量评分、类型等,对文档贡献者给予高额补贴、流量扶持。如果你也想贡献VIP文档。上传文档
查看更多
补充资料打印报窗表体设计
VB.NET打印报表窗体设计
【步骤】
1. 使用Crystal Reports报表设计器生成可以在VB.NET中运行的报表文件(*.rpt)
2. 通过CrystalReportViewer控件将报表文件显示出来。
【设计过程】
1. 添加数据适配器对象,生成数据集对象
如:添加数据适配器对象:myAtapter1,其数据源为:Students
生成数据集对象:DataSet1
2. 添加Crystal Reports文件
① 选择【项目】|【添加新项】再选择“常用项”中的Reporting,弹出如图1所示的【添加新项】对话框。
在【添加新项】对话框中的“模板”列表框中选择Crystal报表,在“名称”文本框中输入CrystalReport1.rpt,然后单击“添加”按钮。
图1 添加新项 对话框
② 接着出现如图2所示的【Crystal Reports库】对话框,选中“使用报表向导”单选按钮,在“选择专家” 列表框中选择“标准”,再单击“确定”按钮,打开如图3所示的【选择要报告的数据】对话框。
图2 Crystal Reports库 对话框 图3 选择要报告的数据对话框
在图3中展开【项目数据】|【ADO.NET数据集】|【Crystal.ClassesDataSet】,选择“Students”,单击向右箭头的按钮插入表,如图3所示。
③ 单击“下一步”按钮,弹出【选取字段对话框】,展开“Students”,并选定要显示的字段。
图4 选取字段对话框
④ 单击“下一步”按钮,弹出【显示分组依据对话框】
图5 显示分组依据对话框
⑤ 单击“下一步”按钮,弹出【可选择要显示的信息子集对话框】
图6 选择要显示的信息子集对话框
⑥ 单击“下一步“按钮,弹出【选择报表样式对话框】,如图6所示。
图7选择报表样式对话框
⑦ 单击“完成”按钮,打开如图7所示的报表设计窗口。
图7 报表设计窗口
3. 调整字段的位置与宽度,绘制表格线
在报表设计窗口中调整字段的位置与宽度,利用“Crystal Reports工具按钮中的“线条对象”工具绘制表格线。
4. 添加 ReportDocument组件
从工具箱中拖动ReportDocument组件到“打印报表”窗体中,弹出“选择一个ReportDocument”对话框,选取在前面添加的“crystalReport1”,如图8所示。然后单击“确定”按钮,在“打印报表“窗体的组件区会出现“crystalReport1”组件。
图8 “选择一个ReportDocument”对话框
5. 在窗体中添加CrystalReportViewer1控件
图9 在窗体中添加CrystalReportViewer1控件
6. 编写在报表中显示数据的代码
Public Class Form1
Private Sub StudentsBindingNavigatorSaveItem_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles StudentsBindingNavigatorSaveItem.Click
Me.Validate()
Me.StudentsBindingSource.EndEdit()
Me.TableAdapterManager.UpdateAll(Me.ClassesDataSet)
End Sub
Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
TODO: 这行代码将数据加载到表“ClassesDataSet.Students”中。您可以根据需要移动或移除它。
Me.StudentsTableAdapter.Fill(Me.ClassesDataSet.Students)
crystalReport11.SetDataSource(Me.ClassesDataSet.Tables(0))
crystalReportviewer1.reportsource = crystalReport11
End Sub
End Class
文档评论(0)