我做了个窗口,用WebBrowser打开了word然后我想把word的批注功能打开,代码我弄好了,在按钮里面,以下是代码
Dim webWord As WinForm.WebBrowser = e.Form.Controls("webWord")
Dim app As MSWord.Application
try
app = System.Runtime.InteropServices.Marshal.GetActiveObject("Word.Application")
Catch ex As Exception
msgbox("没有已打开的word文档!")
Return
End try
Dim odoc As MSWord.Document = app.ActiveDocument ' app.Documents.Open(fl)
app.UserName = UName
With odoc
.TrackRevisions = True
.ShowRevisions = True
End With
点击按钮后能生效,打开批注功能,但是我想打开窗口,自动打开批注,我无论放在打开word代码之后,还是窗口的aftershow里面,都不起作用
好像是word打开需要一两秒时间,得等word完全打开后,运行这批注代码才有用,求解决