# Re: 可否再完美一点

Posted by Lai on January 27, 1999 at 08:37:30:

In Reply to: Re: 我写个范例,你参考看看 posted by 小白痴 on January 27, 1999 at 08:04:19:

: : Dim objWord As Object

: : Private Sub Command1_Click()
: : objWord.Visible = True
: : objWord.ActiveWindow.Close

: : objWord.Documents.Open FileName:=Me.Text1.Text '填入欲开启的word档的路径及档名

: : End Sub

: : Private Sub Form_Load()
: : Set objWord = CreateObject("Word.Application")
: : objWord.Documents.Add
: :

: : End Sub

: 谢谢你！

感谢您..因执行后Word会缩小至工作列上,有何方法
不要在工作列上,直接在画面上?

Follow Ups:

- Re: 可否再完美一点 yehu@tpts6.seed.net.tw 02:51:38 1/28/99 (0)