从列表框到单词表

Question

我想创建一个程序，将ListBox中的项目放到word表中 如何将列表框中的项目放入word表？我有10个列表框（每个库仑1个）所以我需要10个库仑和30行的表 还有一个问题。我可以作为此文档的标题插入文本吗？例如 - ＆gt;文件号21为标题。

Answer 1

向您的项目添加对Microsoft.Office.Interop.Word的引用，它位于Extensions选项卡下：

此代码将生成一个文档，创建一个表，并使用字符串hello填充该表。我假设您知道如何从列表框中读取数据，因此您应该能够轻松地调整此代码来执行此操作：

Imports Word = Microsoft.Office.Interop.Word
Public Class Form1

    Private Sub Form1_Load(sender As Object, e As EventArgs) Handles MyBase.Load
        Dim word As New Word.Application()
        word.Visible = True

        Dim doc = word.Documents.Add()
        Dim table = doc.ActiveWindow.Selection.Tables.Add(doc.ActiveWindow.Selection.Range, 30, 10)

        For i As Integer = 0 To 9
            table.Cell(i, i).Range.Text = "hello"
        Next
    End Sub
End Class