国产探花免费观看_亚洲丰满少妇自慰呻吟_97日韩有码在线_资源在线日韩欧美_一区二区精品毛片,辰东完美世界有声小说,欢乐颂第一季,yy玄幻小说排行榜完本

首頁(yè) > 開(kāi)發(fā) > 綜合 > 正文

vb / C# 中報(bào)表套打的輕松實(shí)現(xiàn)

2024-07-21 02:19:41
字體:
來(lái)源:轉(zhuǎn)載
供稿:網(wǎng)友
關(guān)鍵字: vb c# 報(bào)表 套打

微軟的crystal report是非常不錯(cuò)的報(bào)表工具,今天我想和大家聊聊如果在vb 60 中使用crystal report 提供的環(huán)境在vb 中請(qǐng)輕松實(shí)現(xiàn)報(bào)表的套打功能。以水晶報(bào)表9為用例

craxddrt9.dll

craxddrt9_res_chs.dll

crdesignerctrl.dll

crdesignerctrl_res_chs.dll

以上四個(gè)dll在你安裝好水晶9后會(huì)存在你系統(tǒng)環(huán)境中。你可以在vb項(xiàng)目中通過(guò)瀏覽文件直接引用這幾個(gè)dll

,或則在引用checkbox 列表中選 "reystal reports 9 activex designer run time library",""

"reystal reports 9 activex designer design and runtime library"

然后再工具箱添加一個(gè) compernent 選"embeddedle crystal report 9 designer control"

添加后工具箱多了一個(gè)crdesignerctrl

ok 環(huán)境有了,然后我們可以把crystal report 的設(shè)計(jì)界面嵌入到我們的vb程序了。

程序效果如下:



design



簡(jiǎn)述一下如何將一個(gè)rpt文件打開(kāi)成設(shè)計(jì)界面

代碼如下

[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為前面我們添加的報(bào)表設(shè)計(jì)控件。

[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;

#結(jié)束


發(fā)表評(píng)論 共有條評(píng)論
用戶(hù)名: 密碼:
驗(yàn)證碼: 匿名發(fā)表
主站蜘蛛池模板: 武冈市| 深水埗区| 常熟市| 延寿县| 澎湖县| 东阳市| 天峨县| 新疆| 延庆县| 西乌| 张北县| 克东县| 龙门县| 英德市| 堆龙德庆县| 巩义市| 九寨沟县| 垣曲县| 滦南县| 盐津县| 五寨县| 榕江县| 莱芜市| 舞钢市| 东阿县| 宝山区| 南部县| 邹城市| 河东区| 武城县| 沙坪坝区| 阿拉善右旗| 酒泉市| 桃园县| 武平县| 京山县| 元谋县| 张家界市| 年辖:市辖区| 昆明市| 乐陵市|