如果只有文本的话,可以用下面代码试试
local myoleapp
local strWordCont
myoleapp=createobject("word.application")
myoleapp.visible=.f.
strWordCont=""
objCurDocument=myoleapp.documents.open(thisform.text1.value)
for i=1 to objCurDocument.paragraphs.count
strWordCont=strWordCont+objCurDocument.paragraphs.item(i).range.text
endfor
thisform.edit1.value=strWordCont
否则,就不能用EDIT控件了