恳请高手赐教，万分感谢！！！

学习网上写的几句代码，下面不知如何写，请高手赐教！万分感谢！！！

word file=GETFILE(’word文档：doc’,’试卷’,’选择’,0,’请选择政治试卷’)
wap=CreateObject(“word.application”)
wdocument=wap.documents.open(wordfile)
Myrange=Wdocument. Range
Myrange. Find.ClearFormatting
Myrange.Find.MatchWildcards=.T.
 Myrange.Find.Execute[^13^l^m][答案][^13^l^m]
IF Myrange.Find. Found
&&如果查找到了
DA_B=Myrange. Start
&&记录答案分界符的开始位置
ENDIF