Question

我需要在运行时使用vb.net创建一个word文档。如何在不使用microsoft.office.interop的情况下执行此操作？我之前创建了excel文件，但不知道如何使用它。这是我用来创建Excel文件的内容：

 Sub export_to_excel(recordCount As Integer, DataArray(,) As Object, fileName_Location As String)

    Dim oExcel As Object
    Dim oBook As Object
    Dim oSheet As Object

    ''Start a new workbook in Excel.
    oExcel = CreateObject("Excel.Application")
    oBook = oExcel.Workbooks.Add

    ''Add headers to the worksheet on row 1.
    oSheet = oBook.Worksheets(1)
    '  For i = 0 To headers.Count - 1
    oSheet.Range("A1").Value = "AAA"
    oSheet.Range("B1").Value = "BBB"
    oSheet.Range("C1").Value = "CCC"
    oSheet.Range("A1:C1").Font.Bold = True
    'Next


    ''Transfer the array to the worksheet starting at cell A2.
    oSheet.Range("A2").Resize(recordCount, 3).Value = DataArray

    ''Save the Workbook and quit Excel.
    oBook.SaveAs(fileName_Location)
    oSheet = Nothing
    oBook = Nothing
    oExcel.Quit()
    oExcel = Nothing
    GC.Collect()


End Sub

如何使用此代码之类的东西创建word文件？

Answer 1

有几种方法可以做到这一点。

但首先你在你的例子中使用互操作，你可以用单词做同样的事情。在MSDN

上有一个很好的例子

如果您不需要任何字体或任何东西，您可以随时写入文本文件并使用扩展名.doc，这将在单词中打开它而没有任何问题。

第三个也是最好的解决方案是使用Open XML，这是操作office文档的新方法（扩展docX）。这种格式只是普通的xml，您可以将其作为纯文本或xml进行操作，或者您可以使用open xml sdk，它为您提供了通过现代界面操作单词的优秀方式。这适用于Office 2007及以上版本。文档位于MSDN

如何在vb.net中创建word文档

1 个答案: