VB.net CrystalReport报表

CrystalReport的创建过程

1、选中一个项目—右击—添加—新建项

2、左击Reporting—左击CrystalReports

如果之前没有安装Crystal Reports，会出现如下的界面。（VS2010中没有集成Crystal Reports组件，必须先安装）

此时要做的是，下载相应的组件。相应下载地址。下载安装后，重复上述操作，第2步后的操作界面为

3、点击确定，之后的界面就是为报表指定数据库，表的操作。创建新连接

4、连接创建好后，确定报表显示的表

5、显示那些字段

6、出现如下界面，接下了就是设计报表格式了

CrystalReportViwer控件的创建

 如果你没有在工具箱里发现这个控件可以尝试一下操作

1、工具箱中想工具集上右击—选择项

2、添加相应的控件

按照上面的操作后，如果仍然没有显示相应的控件，可以再按下面的操作做

现在就可以看到相应的控件了

程序中显示报表

1、主要代码

Imports CrystalDecisions.CrystalReports.Engine
Imports CrystalDecisions.Shared

‘如果不能imports，就需要添加引用。

'相对路径 CrystallReports1.rpt默认保存在该项目的文件夹中，但下面代码中的CrystallReport1.rpt是在该项目的bin/debug文件夹中  
Dim path As String = Application.StartupPath & "\CrystalReport1.rpt"

'表示一个报表，并且包含定义、格式化、加载、导出和打印该报表的属性和方法。
Dim Report As New ReportDocument

'加载你事先做好的Crystal Report报表文件
Report.Load(Path)

‘报表依据的显示的表 设定显示的table，dt为DataTable，也可以为ds.Tables(0)
Report.SetDataSource(dt)
’控件加载报表，并显示
CrystalReportViewer1.ReportSource = Report

2、运行的时候如果出现如下错误

需要向向配置文件app.config中添加如下代码

<!--新添加-->
<startup useLegacyV2RuntimeActivationPolicy="true">
<supportedRuntime version="v4.0" sku=".NETFramework,Version=v4.0"/>
</startup>

具体如下图

关于VB.net自带的报表，大家可以看一下崔成龙师哥的这篇博客：VB.NET rdlc 报表的使用