MicrosoftExcel作为一个功能强大的电子表格处理软件

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臣本布衣，躬耕于南阳，苟全性命于乱世，不求闻达于诸侯。先帝不以臣卑鄙，猥自枉 屈，三顾臣于草庐之中，咨臣以当世之事，由是感激，遂许先帝以驱驰。后值倾覆，受任于 败军之际，奉命于危难之间，尔来二十有一年矣。先帝知臣谨慎，故临崩寄臣以大事也。受命以来，夙夜忧叹，恐托付不效，以伤先帝之 明；故五月渡泸，深入不毛。今南方已定，兵甲已足，当奖率三军，北定中原，庶竭驽钝， 攘除奸凶，兴复汉室，还于旧都。此臣所以报先帝而