打印预览方式打开Excel（修改） - 专家坐堂 - Foxtable(狐表) - 新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!

以下是引用程兴刚在2009-11-27 20:01:00的发言：
lxl老兄，word能这样实现吗？谢谢，我更图片点击可在新窗口打开查看

需要这个！

试了半天，这个和Excel有点区别，实现起来有点难
你按以下步骤试试：（没想到解决方法，所以没写成dll形式）
1.下载微软的word组件至狐表根目录

下载信息 [文件大小：下载次数： ]
点击浏览该文件:microsoft.office.interop.word.rar

2.命令窗口执行：
Dim app As New Microsoft.Office.Interop.Word.Application
Dim doc As Microsoft.Office.Interop.Word.Document = app.Documents.Open("D:/aa.doc")
doc.PrintPreview()
app.Visible = True
'这里不知道怎么暂停（Excel自动暂停，所以能实现）
app.Quit

[此贴子已经被作者于2009-11-27 21:08:59编辑过]

主题：打印预览方式打开Excel（修改）