这篇文章主要介绍了C++中如何实现把表的数据导出到EXCEL并打印，具有一定借鉴价值，感兴趣的朋友可以参考下，希望大家阅读完这篇文章之后大有收获，下面让小编带着大家一起了解一下。
实现把表的数据导出到EXCEL并打印实例代码
首先加入这两句：
计算
安全
数据库
网络和加速
企业服务
#include "utilcls.h" #include "comobj.hpp"下面正式开始：
void __fastcall TMainForm::ToExcel(TADOQuery *TT,AnsiString str)
{//TT为被导出数据的表,str为命令(具体看代码底部的if语句)
#define PG OlePropertyGet
#define PS OlePropertySet
#define FN OleFunction
#define PR OleProcedure
Variant excel;
try
{
excel=CreateOleObject("Excel.Application"); //启动Excel
}
catch(...)
{
ShowMessage("无法启动Excel,请检查是否已经安装EXCEL!");
}
excel.PS("Visible", (Variant)true); //使Excel启动后可见
excel.PG("workbooks").FN("Add", 1); //单工作表
for(int i=0;i<TT->FieldCount;i++) //首先给EXCEL添加表的字段名
{
excel.Exec(PropertyGet("Cells")<<1<<i+1).Exec(PropertySet("Value")<<TT->FieldList->Strings[i]);
}
for(int j=0;j<TT->FieldCount;j++)//按字段排列
{ TT->First();
for(int i=0;i<TT->RecordCount;i++)//按数据顺序排雷
{
excel.Exec(PropertyGet("Cells")<<i+2<<j+1).Exec(PropertySet("Value")<<TT->FieldByName(TT->FieldList->Strings[j])->AsString);
TT->Next();
}
}
if(str=="导出"){}//如果是导出，就什么都不干
if(str=="打印")//如果是打印
excel.OlePropertyGet("ActiveWorkBook").OlePropertyGet("ActiveSheet").OleFunction("PrintOut");
if(str=="打印浏览")//如果是打印浏览
excel.OlePropertyGet("ActiveWorkBook").OlePropertyGet("ActiveSheet").OleFunction("PrintPreview");
excel.~Variant();
}感谢你能够认真阅读完这篇文章，希望小编分享的“C++中如何实现把表的数据导出到EXCEL并打印”这篇文章对大家有帮助，同时也希望大家多多支持亿速云，关注亿速云行业资讯频道，更多相关知识等着你来学习!
亿速云「云服务器」，即开即用、新一代英特尔至强铂金CPU、三副本存储NVMe SSD云盘，价格低至29元/月。点击查看>>
免责声明：本站发布的内容（图片、视频和文字）以原创、转载和分享为主，文章观点不代表本网站立场，如果涉及侵权请联系站长邮箱：is@yisu.com进行举报，并提供相关证据，一经查实，将立刻删除涉嫌侵权内容。
