VC60动态生成Word表格实例.doc

  1. 1、本文档共5页,可阅读全部内容。
  2. 2、有哪些信誉好的足球投注网站(book118)网站文档一经付费(服务费),不意味着购买了该文档的版权,仅供个人/单位学习、研究之用,不得用于商业用途,未经授权,严禁复制、发行、汇编、翻译或者网络传播等,侵权必究。
  3. 3、本站所有内容均由合作方或网友上传,本站不对文档的完整性、权威性及其观点立场正确性做任何保证或承诺!文档内容仅供研究参考,付费前请自行鉴别。如您付费,意味着您自己接受本站规则且自行承担风险,本站不退款、不进行额外附加服务;查看《如何避免下载的几个坑》。如果您已付费下载过本站文档,您可以点击 这里二次下载
  4. 4、如文档侵犯商业秘密、侵犯著作权、侵犯人身权等,请点击“版权申诉”(推荐),也可以打举报电话:400-050-0827(电话支持时间:9:00-18:30)。
查看更多
VC?6.0动态生成Word表格实例 ?(1)首先,向你的项目中添加word 2003类型库:方法是在MFC ClassWizard中点击按钮Add Class,选择From a type library,在弹出的浏览对话框中,浏览找到office 2003安装路径下的msword.olb文件,例如:C:\Program Files\Microsoft Office\OFFICE11\MSWORD.OLB,然后选择以下类,这些类都是后面实现生成word表格要用到的: _Application,Documents,_Document,Range, Paragraph,Paragraphs,Cell,Cells,Table,Tables,Border,Borders ,_Font ,PageSetup (2)在使用到这些类型的类的头文件或者cpp文件的开头,包含以下头文件:#include msword.h (3) 创建如下代码 //1.定义对象 _ApplicationoWordApp;? DocumentsoDocs; _DocumentoDoc; Rangerange; Paragraphparagraph; Paragraphsparagraphs; Cellcell; Cellscells; Tabletable; Tablestables; Borderborder; Bordersborders; _Fontfont; PageSetuppagesetup; //2.创建和连接word对象,初始化连接,判断当前系统是否有word进程,然后然后创建或连接对象 LPDISPATCH ??pDisp;? LPUNKNOWN ???pUnk;? CLSIDclsid;? CoInitialize(NULL);? CLSIDFromProgID(LWord.Application,clsid);? if(GetActiveObject(clsid,NULL,pUnk)==S_OK)? {? pUnk- QueryInterface(IID_IDispatch,(void **)pDisp);? oWordApp.AttachDispatch(pDisp);? } ? else? {? if(!oWordApp.CreateDispatch(Word.Application)) { AfxMessageBox(创建Word服务失败!);? } } //初始化文档,生成WORD表格 oDocs.ReleaseDispatch(); oWordApp.m_bAutoRelease=true; BeginWaitCursor(); oDocs=oWordApp.GetDocuments(); COleVariant vOpt(DISP_E_PARAMNOTFOUND, VT_ERROR); oDoc=oDocs.Add(vOpt,vOpt,vOpt,vOpt);//加新文档 pagesetup=oDoc.GetPageSetup(); pagesetup.SetOrientation(1);//横向 paragraphs=oDoc.GetParagraphs(); //生成第一个表 paragraph=paragraphs.GetLast();//以当前段落最后一行为表起始位置 range=paragraph.GetRange(); //添加制作新表格 tables=oDoc.GetTables(); int nBhCount=3; table=tables.Add(range,5+nBhCount,6,vOpt,vOpt); borders=table.GetBorders(); borders.SetEnable(1);//显示表框 range=table.GetRange(); cells=range.GetCells(); cells.SetVerticalAlignment(1);//文字居中 #define DOC_TABLE1_WIDTH 60 cells.SetWidth(DOC_TABLE1_WIDTH);? cell=table.Cell(1,1);//合并第一行的三列 cell.Merge(table.Cell(1,6)); range=cell.GetRange(); range.SetBold(1); range.SetText(病害统计信息);//居中 cell=table.Cell(2,1); cell.Merge(table.Cell(2,2)); range=cell.GetRange(); range.SetBold(1); range.SetText(组成材料); cell=

文档评论(0)

kabudou + 关注
实名认证
内容提供者

该用户很懒,什么也没介绍

1亿VIP精品文档

相关文档