1.在VB中如何只显示Word的打印预览;
2.怎样调整预览的比例,我想把预览窗口调出来就是以100%的比例显示。
3.关闭预览窗口窗口时,不显示文档,直接关闭Word我的代码如下:
  Dim ow As Object
  Dim oc As Object  Set ow = CreateObject("word.application")
  Set oc = ow.Documents.Add("c:\a.doc")
  ow.Visible = True
  oc.PrintPreview'预览窗口比例不是100%,是40% '关闭预览窗口只有没有把Word关闭
 
 Set oc = Nothing
 Set ow = Nothing

解决方案 »

  1.   

    ow.AutoCorrect.Application.ActiveDocument.PrintPreview 就可以完成打印预览,那个比例我没有做过,我是用100%的比例做的,其它的我没有试过。ow.WordApp.AutoCorrect.Application.Quit False,,不保存文档,用这个就可以直接关闭Word了,说一个好的操作Word方法,也许有用。你就是用Word里面的录制宏,然后把这个宏代码复制到vb代码里就可以了,只要小做修改就可以了。
    有什么问题,大家一起讨论。msn:[email protected]
      

  2.   

    Set ow = CreateObject("word.application")
        Set od = ow.documents.open("c:\aa.doc")
        ow.Visible = True
        od.PrintPreview
        ow.ActiveWindow.ActivePane.View.Zoom.Percentage = 100