# 救救我,我很急!

Posted by chjichin on November 26, 1998 at 23:28:49:

Dim word1 As Object
Dim ww As Document
Set word1 = CreateObject("Word.Application")
Documents.Add ("c:\tt.doc")
word1.Selection.PageSetup.LeftMargin = CentimetersToPoints(1.9)
word1.Selection.PageSetup.TopMargin = CentimetersToPoints(1.9)
word1.Visible = True
AppActivate word1.Application.Caption
Set word1 = Nothing
Set ww = Nothing

以上这个程式,为何第一次执行,它正常地开启word,但关闭word后,再执行一次,就会出现错误(只是关闭word,但没有关闭程式)

Follow Ups:

- Re: 救救我,我很急! ChenNet 10:51:00 11/27/98 (1)
  - Re: 救救我,我很急! chjichin 17:04:11 11/27/98 (0)