在Vb.net中保存Word文档

我是Vb新手，在将文本框中的文本保存到word文档时遇到了一个问题。文档可以保存在我希望保存的任何位置，但当我打开它时，它会弹出

这是保存的代码

Private Sub BtnSave_Click(sender As Object, e As EventArgs) Handles BtnSave.Click
    Dim SaveDialog As New SaveFileDialog
    SaveDialog.Filter = "Word Document (*.docx)|*.docx|Word 97-2003 Document (*.doc)|*.doc|Plain Text (*.txt)|*.txt"
    SaveDialog.ShowDialog()
    If SaveDialog.FileName <> "" Then
        Dim writer As New StreamWriter(SaveDialog.FileName)
        writer.WriteLine(TxtPreviewcertificate.Text)
        writer.Close()
    End If
End Sub

Private Sub BtnSave\u单击（发送者作为对象，e作为事件参数）处理BtnSave。单击
将SaveDialog设置为新的SaveFileDialog
SaveDialog.Filter=“Word文档（*.docx）|*.docx | Word 97-2003文档（*.doc）|*.doc |纯文本（*.txt）|*.txt”
SaveDialog.ShowDialog（）
如果是SaveDialog.FileName“”，则
Dim writer作为新StreamWriter（SaveDialog.FileName）
writer.WriteLine（TxtPreviewcertificate.Text）
writer.Close（）
如果结束
端接头

末级

---

如果有人能帮我，请告诉我，谢谢。

我把它从.docx改为.doc

SaveDialog.Filter = "Word Document (*.docx)|*.docx|Word 97-2003 Document (*.doc)|*.doc|Plain Text (*.txt)|*.txt"

---

docx文件不是简单的文本文件。使用txt扩展名保存文件您可以使用interop…xml sdk…或其他第三方来创建word文档。。。