以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  word文件转为pdf,提示导出失败，因为此功能尚未安装  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=140463)
--  作者：fntfgz
--  发布时间：2019/9/6 8:18:00
--  word文件转为pdf,提示导出失败，因为此功能尚未安装

老师，我用下面代码把word转为pdf,我安装了office 2007,担是提示“提示导出失败，因为此功能尚未安装”，代码如下：

 

Dim app As New MSWord.Application
try
    Dim fileName = "D:\\ssss.docx"
    app.Documents.Open(fileName)
    app.Documents(fileName).ExportAsFixedFormat("D:\\w.pdf",  MSWord.WdExportFormat.wdExportFormatPDF)
catch ex As exception
    msgbox(ex.message)
finally
    app.Quit
End try

 

请问老师，以上代码需要什么环境，office2010 没有问题，有什么代码可以检测环境吗？如果不符合，提示退出
--  作者：有点蓝
--  发布时间：2019/9/6 8:24:00
--  
没有办法检测，只能使用try处理。