WOLE=CREATEOBJ('WORD.APPLICATION')
WOLE.VISIBLE=.T.
WOLE.DOCUMENTS.ADD

当用以上生成WORD时,是在新窗口的,如何才能将WORD页面激活为当面活动页面,展示在当面页面?

当用VFP 添加WORD的add的页面时并不能展示当前的WORD页面,还是停留在VFP程序页面，就是说VFP执行完生成WORD页面时，要使WORD窗口呈现在顶端，而不是停留在VFP页面

WOLE=CREATEOBJ('WORD.APPLICATION')
WOLE.DOCUMENTS.ADD
WOLE.Selection.EndKey(6)
WOLE.VISIBLE=.T.

是WPS软件。不是WORD软件。

谢谢，试了一下还是不行，代码如下

WOLE=CREATEOBJ('WORD.APPLICATION')
WOLE.DOCUMENTS.ADD
WOLE.Selection.EndKey(6)
bb=wole.ActiveWindow.Hwnd
WOLE.VISIBLE=.T.
WOLE.Application.ActiveWindow.Panes(1).Selection.Active

Declare Long SetWindowPos In "user32" long hwnd,long hwndInsertAfter,long x,long y,long cx,long cy,long wFlags
SetWindowPos(bb,-1,0,0,0,0,3) &&窗口置顶