从列表框到单词表

Question

我想制作一个程序，将列表框中的项目放入单词表中。
如何将列表框中的项目放入单词表中？我有 10 个列表框（每列 1 个），因此我需要包含 10 列和 30 行的表格。

还有 1 个问题。我可以插入文本作为该文档的标题吗？例如 -> 文档编号 21 作为标题。

Answer 1

将对

Microsoft.Office.Interop.Word

的引用添加到您的项目中，它位于“扩展”选项卡下：

此代码将生成一个文档，创建一个表格，然后用字符串

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