国产探花免费观看_亚洲丰满少妇自慰呻吟_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ā)表
主站蜘蛛池模板: 永仁县| 麦盖提县| 尉犁县| 中阳县| 保德县| 昌都县| 九龙坡区| 巴彦淖尔市| 曲周县| 南城县| 英德市| 哈巴河县| 扬中市| 巩留县| 汉源县| 潜江市| 奉化市| 枣强县| 石渠县| 南通市| 合作市| 武功县| 泰顺县| 江孜县| 翼城县| 昌邑市| 贵州省| 巴塘县| 宽甸| 巨鹿县| 清河县| 白沙| 洪雅县| 斗六市| 中西区| 延津县| 天津市| 湘乡市| 大庆市| 福泉市| 亚东县|