VB6中水晶报表(CrystalReport4.6)的使用经验

我第一次接触水晶报表是在2001年3月在我的同事尹晓祥同志开始接触水晶报表的.

水晶报表(Crystal Report 4.6)只支持Access97格式的数据库, 所以,先在Access2000格式中设置好表与表的关系,再把表转换到97格式,在水晶报表中调入97数据库后,在Links中自动会找出表间的关系.

水晶报表在VB的安装盘中已自带了. 路径:

COMMON\TOOLS\VB\CRYSREPT\CRYSTL32.EXE

系列号: 1231467890

安装后,运行路径: \Program Files\Microsoft Visual Studio\Common\crw32.exe

VB6中运用晶报表的理由是: 它支持图相(Binary型)字段(BLOB二进制大型对象)

运用水晶报表的步骤:

先进入VB的菜单栏: 外接程序--报表设计器

自动进入水晶报表, 设计好报表,存成报表文件,如SQL.rpt

再在VB工程中引入部件Crystal Report Control 4.6

如果是Access数据库, 激活代码:

CrystalReport1.DiscardSavedData = True '自动从数据库中刷新数据

CrystalReport1.ReportFileName = App.Path & "\mdb.rpt"

CrystalReport1.WindowState = crptMaximized

CrystalReport1.Action = 1

如果是SQL Server 2000数据库,激活代码:

CrystalReport1.Connect = "ODBC;DNS=SQL_db1;UID=" & Text4.Text & ";PWD=" & Text5.Text &

";DSQ=db1" '连接SQL Server服务器的ODBC

CrystalReport1.DiscardSavedData = True '自动从数据库中刷新数据

CrystalReport1.ReportFileName = App.Path & "\sql.rpt"

CrystalReport1.WindowState = crptMaximized

CrystalReport1.Action = 1

重要:

a.如果需要报表预览时最大化纸张显示, 需在水晶报表设计器中设置: File--Report Options-PreviewPages Start With --Full Size

b.如果只需要显示Detail部分,则在报表设计器的Design界面下的其它部分的左边按右键,在弹出的快捷

菜单内选定:

Hide Section

c.如果要一页打印一条记录,则在报表设计器的Design界面下的Detail字样上按右键,在Format Section中选择New Page After

d.如果Detail部分需要字符型字段自动折行显示, 则双击该字段,选择:Print on multiple lines

e.Detail部分数值型的显示格式,双击该字段,可弹出显示格式选项

f.目前还没有发现水晶报表具有分栏打印的功能,BCB的QuickReport则有