IDC资讯中心
关键字: vb c# 报表 套打
微软的crystal report是非常不错的报表工具，今天我想和大家聊聊如果在vb 60 中使用crystal report 提供的环境在vb 中请轻松实现报表的套打功能。以水晶报表9为用例
craxddrt9.dll
craxddrt9_res_chs.dll
crdesignerctrl.dll
crdesignerctrl_res_chs.dll
以上四个dll在你安装好水晶9后会存在你系统环境中。你可以在vb项目中通过浏览文件直接引用这几个dll
，或则在引用checkbox 列表中选 "reystal reports 9 activex designer run time library",""
"reystal reports 9 activex designer design and runtime library"
然后再工具箱添加一个 compernent 选"embeddedle crystal report 9 designer control"
添加后工具箱多了一个crdesignerctrl
ok 环境有了，然后我们可以把crystal report 的设计界面嵌入到我们的vb程序了。
程序效果如下:
design
简述一下如何将一个rpt文件打开成设计界面
代码如下
[vb 6]
private sub command1_click()
dim f_name as string
dim m_application as new craxddrt.application
dim m_report as new craxddrt.report
reportpath = ""
me.commondialog1.showopen
reportpath = me.commondialog1.filename
if reportpath <> "" then
set m_report = m_application.openreport(reportpath, 0)
me.crdesignerctrl1.reportobject = m_report
end if
end sub
crdesignerctrl1为前面我们添加的报表设计控件。
[c#]
craxddrt.application m_application = new craxddrt.applicationclass();
craxddrt.report m_report;
this.openfiledialog1.showdialog();
f_name=this.openfiledialog1.filename.tostring();
m_report=m_application.openreport(f_name,0);
this.axcrdesignerctrl1.reportobject=m_report;
this.axcrdesignerctrl1.displayfieldview=false;
#结束
