水晶报表的一些基础使用方法

1.基础使用

Dim rs As Class1 = New Class1         Dim sql As String         sql = "select * from t_shap"

        Dim dss As test3.Dataset1 = New test3.Dataset1  '自定义数据集

        rs.get_dataset1(sql, dss)

         '创建报表对象         Dim doc As CrystalDecisions.CrystalReports.Engine.ReportDocument = New CrystalDecisions.CrystalReports.Engine.ReportDocument         Dim str As String         str = "D://net//test3//r1.rpt"

        '加载报表         doc.Load(str)         '为报表对象设置数据源         doc.SetDataSource(dss)         CType(doc.ReportDefinition.ReportObjects("ym"), CrystalDecisions.CrystalReports.Engine.TextObject).Text = "我水晶OK"         '以报表查看器显示报表

        CrystalReportViewer5.ReportSource = doc         CrystalReportViewer5.DataBind()         CrystalReportViewer5.RefreshReport() 

2.外观设置

1、外观： 设置 Crystal Report Viewer 的属性： BestFitPage 布尔值。获取或设置页面视图是大小合适还是用滚动条进行裁剪。 配合设置 Width、Height 来实现无空白和无滚动条的显示！ DisplayGroupTree 布尔值。获取或设置树视图是可见还是隐藏。 DisplayPage 布尔值。获取或设置工具栏是可见还是隐藏。 DisplayToolbar 布尔值。获取或设置工具栏上的转到页按钮是可见还是隐藏。 PageZoomFactor Int32。获取或设置报表的缩放因数。 SeparatePages 布尔值。获取或设置报表页是分开还是连接。 PageToTreeRatio Float64。设置组树与报表视图之间的大小比例。 ——————————————————————————————————————  2、控制工具栏的按钮： 设置 Crystal Report Viewer 的属性： HasGotoPageButton 布尔值。获取或设置转到页按钮的可见性。 HasLevelUpButton 布尔值。获取或设置工具栏上的转到上一页按钮是可见还是隐藏。 HasPageNavigationButtons 布尔值。获取或设置工具栏上的页面导航按钮是可见还是隐藏。 HasRefreshButton 布尔值。获取或设置工具栏上的刷新按钮是可见还是隐藏。 HasSearchButton 布尔值。获取或设置工具栏上的搜索按钮是可见还是隐藏。 HasZoomFactorList 布尔值。获取或设置工具栏上的缩放因数列表是可见还是隐藏。 —————————————————————————————————————— 3、在 Web 页面里的布局： 在“设计视图”，修改 CrystalReportViewer 的 Width、Height 属性。 切换到窗体的“HTML 视图”，修改 style 属性。 <CR:CrystalReportViewer id="CrystalReportViewer1" style="Z-INDEX: 101; LEFT: 8px; POSITION: absolute; TOP: 8px" runat="server" Width="350px" Height="50px" EnableDrillDown="False" DisplayGroupTree="False"></CR:CrystalReportViewer> —————————————————————————————————————— 4、除水晶报表的的公司LOGO 将 Crystal 公司的Logo 文件替换或删除…… (1)如果是用 VS.NET 里自带的水晶报表 C:/Program Files/Microsoft Visual Studio .NET/Crystal Reports/Viewers/images/ToolBar/logo.gif (2)如果是用水晶报表 9.2 C:/Program Files/Common Files/Crystal Decisions/2.0/crystalreportviewers/images/toolbar/crlogo.gif —————————————————————————————————————— 5、替换水晶报表里的各种图标和图片 (1)如果是用 VS.NET 里自带的水晶报表 C:/Program Files/Microsoft Visual Studio .NET/Crystal Reports/Viewers/images (2)如果是用水晶报表 9.2 C:/Program Files/Common Files/Crystal Decisions/2.0/crystalreportviewers/images

6.实际使用方法

'图表设置         '图形样式设置         Chart1.Series(0).Type = Dundas.Charting.WebControl.SeriesChartType.Column         '图形是否3D显示         Chart1.ChartAreas(0).Area3DStyle.Enable3D = False         '数据字段设置         Chart1.Series(0).ValueMembersY = "data"         Chart1.Series(0).ValueMemberX = "content"         '横向轴跨度设置         Chart1.ChartAreas(0).AxisX.Interval = 1         '小图标文字设置         Chart1.Series(0).Name = "数量"         '标题文字设置(设计时先打上空白标题)         Chart1.Titles(0).Text = "标题"         '纵向轴设置         Chart1.ChartAreas(0).AxisY.Arrows = Dundas.Charting.WebControl.ArrowsType.Triangle  '有向上箭头         Chart1.ChartAreas(0).AxisY.LineColor = System.Drawing.Color.Red '红色

        Chart1.DataSource = ds         Chart1.DataBind()