pptApp.Quit‘退出PowerPoint程序
　　Set pptPre = Nothing ‘释放资源
　　Set pptApp = Nothing
　　objdoc.SaveAs FileName:=“word文档的保存路径”
　　objdoc.Close‘关闭word文档
　　objword.Quit‘退出word程序
　　Set objdoc = Nothing‘释放资源
　　Set objword = Nothing
　　3 运行界面与测试结果
　　图1为程序运行界面和测试结果。其中，在程序界面中，增加了两个命令按扭，通过对话框控件由用户自行选择导入PPT文件的路径和保存word文档的路径；测试结果是由转换后的word文档，按笔者单位的教师备课纸（4）进行简单排版，在页眉中增加标题，将文本转换为表格，并合并部分表格所得到。
　　4 结束语
　　利用VB6.0编程方式将PowerPoint演示文稿转换为Word文档，可以突破Office自带转换功能的各种局限，同步转换图片，极大地提高办公效率。
　　但由于人们在编辑PowerPoint演示文稿的习惯不一样，以及不同场合的Word文档排版格式也不一样，利用程序生成的Word文档，还需要进行一些简单的排版。
　　参考文献：
　　[1] 陈军民.浅析利用VB6.0将Access数据表转换为Word文档[J].电脑知识与技术,2010(23).
　　[2] 张捷,封俊红.基于VBA的PPT文档转换为Word文档的研究与实现[J].微型电脑应用,2009(2).
　　[3] 付全.浅析Office成员间的数据交流[J].科技资讯,2008(27).
 

(责任编辑：南粤论文中心)转贴于南粤论文中心: http://www.nylw.net(南粤论文中心__代写代发论文_毕业论文带写_广州职称论文代发_广州论文网）