VB.net & Word2007 异常：外部组件发生异常？？？？VB6.0行，VB2008就不行？？？
我在word2007中录制了一段替换功能的宏，放到Visual Basic 2008中改写成如下函数：
Public Sub ReplaceText(ByVal W As Microsoft.Office.Interop.Word.Application, ByVal Textfrom As String, ByVal Textto As String)
With W.Selection.Find
.Text = Textfrom
.Replacement.Text = Textto
.Forward = True
.Wrap = 1
.Format = False
.MatchCase = False
.MatchWholeWord = False
.MatchByte = True
.MatchWildcards = False
.MatchSoundsLike = False
.MatchAllWordForms = False
End With
W.Selection.Find.Execute(Replace:=2)
End Sub
然后在Button1的事件里添加加下代码：
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click
Dim myWordapp As New Microsoft.Office.Interop.Word.Application
myWordapp.Visible = True
myWordapp.Documents.Open("E:\1.docx")
Call ReplaceText(myWordapp, "000", "111")
myWordapp.Documents.Save()
myWordapp.Documents.Close()
myWordapp.Quit()
End Sub
结果在运行到替换函数内部的下列语句时发生异常：
.Text = Textfrom ’外部组件发生异常
怎么回事？我原来用VB6.0时也这么用，没什么问题的啊？
本人纯粹菜鸟一只。
[解决办法]
W.Selection.Find
