MicrosoftExcel作为一个功能强大的电子表格处理软件_第1页
MicrosoftExcel作为一个功能强大的电子表格处理软件_第2页
MicrosoftExcel作为一个功能强大的电子表格处理软件_第3页
MicrosoftExcel作为一个功能强大的电子表格处理软件_第4页
全文预览已结束

下载本文档

版权说明:本文档由用户提供并上传,收益归属内容提供方,若内容存在侵权,请进行举报或认领

文档简介

1、newxls=(ex.OleFunction(Microsoft Excel作为一个功能强大的电子表格处理软件,已经得到了广泛的应用。在数据库 应用软件开发过程中,如果能实现数据库与Excel文件的数据交换,那么一方面能增加数据库数据的来源,另一方面也能方便用户对数据库数据的进一步处理。C + Builder是一个可视化快速应用程序开发工具,它提供的OLE Automation机制使得开发人员在应用程序中就能调用 Excel,实现数据交换。在C + + Builder中调用Excel,首先要为Excel建立一个OLE对象,然后通过设定该对象的属性和调 用该对象的方法来操纵 Excel。C+ B

2、uilder通过CreateOleObject()来建立 OLE对象;用OlePropertySet(propname,value)来设置 OLE 对象的属性;用 OlePropertyGet(propname)获得 OLE 对象的属 性;通过 OleFunction(oleFuncName,val,.)和 OleProcedure(oleProcName,val,.)来调用 OLE 对象的方法。C + Builder中使用OLE自动化操纵Excel,必须掌握Excel的自动化对象及 VBA关于Excel的对象 方法和属性,这些都在Microsoft Office(完全安装)的VBAXL8.H

3、LP帮助文件中可以找到,在此就不再赘述。 下面以将数据库中的数据转到Excel工作薄中为例,说明 C + + Builder操纵Excel的具体方法。首先新建一个表单 Form1,保存单元文件Unit1.cpp,保存工程文件Project1.bpr。然后在表单中加入数 据访问控件 TTable,将Name属性设为 Table1, DatabaseName属性设为 BCDEMOS,TableName属性设为 Country.db。在表单中加入一个按钮控件TButton,将其Name属性设为 Button1, Caption属性设为 转换为Excel文件”双击Button1,在Button1Cli

4、ck()函数中加入如下代码:Variant ex,newxls;int i,j=1;tryex=CreateOleObject( Excel.Application 启动Excelcatch(.)ShowMessage(无法启动 Excel );ex.OlePropertySet( Visible ,(Variant)trt使);Excel 启动后可见Workbooks ).OleFunction(新建Ad 个工作薄Table1 Active=true;/打开数据库Table1 First();for(i=0;i Table1 FieldCount;i + )/将字段名写到工作薄的第一行(ex

5、.OleFunction( Cells ).OlePropertySet( Item ,(Variafit1)l,(V V&iiriaiirl:)Table1 Fields FieldName);while(!Table1 Eof)/将数据库中的记录依次写到工作薄中 j=j +1;for(i=0;i Tablel FieldCount;i + )(ex.OleFunction( Cells ).OIePropertySet( Item ,(Variant)j,(VOr)ant)(i(Variant)Tablel Fields AsString);Table1 Next();newxls.Ole

6、Function( SaveAs ,(Variant)filename);/保存工作薄,filename是工作薄的全文件名ex.OleFunction( Quit );/退出Excel,释放OLE对象注意,要使用OLE自动化对象,在编译之前还必须在 Unit1.cpp文件前面加上# include ComObj.hpp运行程序就可以实现将数据库中的数据转换到Excel工作薄中。同样的道理,使用OlePropertyGet()函数,也可以将Excel工作薄中的数据读到数据库中去。以上代码在 Windows 98操作系统、C+ Builder 3.0下调试运行通过北国风光, 千里冰封, 万里雪飘。

7、 望长城内外,惟余莽莽;大河上 下,顿失滔滔。山舞银蛇,原驰蜡象,欲与天公试 比高。须晴日,看红装素裹,分外妖娆。江山如此多娇,引无数英雄竞折腰。惜秦皇汉武,略输文采;唐宗宋 祖,稍逊风骚。一代天骄,成吉思汗,只识弯弓射 大雕。俱往矣,数风流人物,还看今朝。匚口克出师表两汉:诸葛亮先帝创业未半而中道崩殂, 今天下三分,益州疲弊,此诚危急存亡之秋也。然侍卫之臣 不懈于内,忠志之士忘身于外者,盖追先帝之殊遇,欲报之于陛下也。诚宜开张圣听,以光 先帝遗德,恢弘志士之气,不宜妄自菲薄,引喻失义,以塞忠谏之路也。宫中府中,俱为一体;陟罚臧否,不宜异同。若有作奸犯科及为忠善者,宜付有司论其 刑赏,以昭陛下

8、平明之理;不宜偏私,使内外异法也。侍中、侍郎郭攸之、费祎、董允等,此皆良实,志虑忠纯,是以先帝简拔以遗陛下:愚 以为宫中之事,事无大小,悉以咨之,然后施行,必能裨补阙漏,有所广益。将军向宠,性行淑均,晓畅军事,试用于昔日,先帝称之曰能”,是以众议举宠为督:愚以为营中之事,悉以咨之,必能使行阵和睦,优劣得所。亲贤臣,远小人,此先汉所以兴隆也; 亲小人,远贤臣,此后汉所以倾颓也。 先帝在时, 每与臣论此事,未尝不叹息痛恨于桓、 灵也。侍中、尚书、长史、参军,此悉贞良死节之臣, 愿陛下亲之、信之,则汉室之隆,可计日而待也 .FT臣本布衣,躬耕于南阳,苟全性命于乱世,不求闻达于诸侯。先帝不以臣卑鄙,猥自枉 屈,三顾臣于草庐之中,咨臣以当世之事,由是感激,遂许先帝以驱驰。后值倾覆,受任于 败军之际,奉命于危难之间,尔来二十有一年矣。先帝知臣谨慎,故临崩寄臣以大事也。受命以来,夙夜忧叹,恐托付不效,以伤先帝之 明;故五月渡泸,深入不毛。今南方已定,兵甲已足,当奖率三军,北定中原,庶竭驽钝, 攘除奸凶,兴复汉室,还于旧都。此臣所以报先帝而

温馨提示

  • 1. 本站所有资源如无特殊说明,都需要本地电脑安装OFFICE2007和PDF阅读器。图纸软件为CAD,CAXA,PROE,UG,SolidWorks等.压缩文件请下载最新的WinRAR软件解压。
  • 2. 本站的文档不包含任何第三方提供的附件图纸等,如果需要附件,请联系上传者。文件的所有权益归上传用户所有。
  • 3. 本站RAR压缩包中若带图纸,网页内容里面会有图纸预览,若没有图纸预览就没有图纸。
  • 4. 未经权益所有人同意不得将文件中的内容挪作商业或盈利用途。
  • 5. 人人文库网仅提供信息存储空间,仅对用户上传内容的表现方式做保护处理,对用户上传分享的文档内容本身不做任何修改或编辑,并不能对任何下载内容负责。
  • 6. 下载文件中如有侵权或不适当内容,请与我们联系,我们立即纠正。
  • 7. 本站不保证下载资源的准确性、安全性和完整性, 同时也不承担用户因使用这些下载资源对自己和他人造成任何形式的伤害或损失。

评论

0/150

提交评论